Changeset 285 for trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/loadgrid.pro

Timestamp:

09/14/07 13:05:09 (17 years ago)

Author:

smasson

Message:

allways return back a scalar is /firstfound used

File:

• trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/loadgrid.pro (modified) (2 diffs)

trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/loadgrid.pro

@@ -40 +40 @@
   meshfile = strtrim(meshfile, 2)
 ; try to find a .pro file with this name...
-  filepro = (find(meshfile[0], /firstfound, /onlypro))[0]
+  filepro = find(meshfile[0], /firstfound, /onlypro)
 ; if this is an idl batch file or a procedure
   if filepro NE 'NOT FOUND' THEN BEGIN
@@ -52 +52 @@
     ENDCASE
   ENDIF ELSE BEGIN
-    filenc = (find(meshfile[0], /firstfound, /onlync))[0]
+    filenc = find(meshfile[0], /firstfound, /onlync)
     if filenc EQ 'NOT FOUND' THEN stop
     listing = 'initncdf, ''' + filenc +''''