Removed tableInqParLongname().

src/cdi.h

@@ -1221,7 +1221,6 @@ int     tableInqModel(int tableID);
 void    tableInqEntry(int tableID, int id, int ltype, char *name, char *longname, char *units);
 
 int     tableInqParCode(int tableID, char *name, int *code);
-int     tableInqParLongname(int tableID, int code, char *longname);
 int     tableInqParUnits(int tableID, int code, char *units);
 
 /* History routines */

src/table.c

@@ -825,32 +825,6 @@ int tableInqParCode(int tableID, char *varname, int *code)
 }
 
 
-int tableInqParLongname(int tableID, int code, char *longname)
-{
-  if ( ((tableID >= 0) & (tableID < MAX_TABLE)) | (tableID == CDI_UNDEFID) ) { } else
-    Error("Invalid table ID %d", tableID);
-
-  int err = 1;
-
-  if ( tableID != CDI_UNDEFID )
-    {
-      int npars = parTable[tableID].npars;
-      for ( int item = 0; item < npars; item++ )
-	{
-	  if ( parTable[tableID].pars[item].id == code )
-	    {
-	      if ( parTable[tableID].pars[item].longname )
-		strcpy(longname, parTable[tableID].pars[item].longname);
-              err = 0;
-	      break;
-	    }
-	}
-    }
-
-  return err;
-}
-
-
 int tableInqParUnits(int tableID, int code, char *units)
 {
   if ( ((tableID >= 0) & (tableID < MAX_TABLE)) | (tableID == CDI_UNDEFID) ) { } else

src/vlist_var.c

@@ -583,8 +583,8 @@ void vlistInqVarLongname(int vlistID, int varID, char *longname)
 	{
 	  int code = pnum;
           int tableID = vlistptr->vars[varID].tableID;
-	  if ( tableInqParLongname(tableID, code, longname) != 0 )
-	    longname[0] = '\0';
+          name[0] = 0;
+          tableInqEntry(tableID, code, -1, NULL, longname, NULL);
 	}
     }
   else