Ignore:
Timestamp:
02/09/09 14:20:16 (15 years ago)
Author:
smasson
Message:

add a call to isafile in ncdf_get*.pro

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/SRC/ReadWrite/ncdf_getatt.pro

    r372 r391  
    8080  compile_opt idl2, strictarrsubs 
    8181; 
     82  @cm_general                      ;   needed for iodir 
     83; 
    8284; should we open the file? 
    83   IF size(fileid, /type) EQ 7 THEN cdfid = ncdf_open(fileid) ELSE cdfid = fileid 
     85  IF size(fileid, /type) EQ 7 THEN $ 
     86     cdfid = ncdf_open(isafile(fileid, title = 'which file must be open by ncdf_getatt?', IODIRECTORY = iodir, _extra = ex)) $ 
     87  ELSE cdfid = fileid 
    8488; default definitions 
    8589  units = '' 
Note: See TracChangeset for help on using the changeset viewer.