netCDF4 classic: existing files are converted to netCDF4 - classic flag is lost (bug fix)

ChangeLog

@@ -5,6 +5,7 @@
 
 2014-03-10  Uwe Schulzweida
 
+	* netCDF4 classic: existing files are converted to netCDF4 - classic flag is lost (bug fix)
 	* cgribexDefParam: check validity of parameter number
 
 2014-03-04  Uwe Schulzweida

NEWS

 CDI NEWS
 --------
 
+Version 1.6.4 (20 May 2014):
+
+   New features:
+   Fixed bugs:
+     * netCDF4 classic: existing files are converted to netCDF4 - classic flag is lost
+
 Version 1.6.3 (14 February 2014):
 
    New features:

src/stream.c

@@ -729,6 +729,9 @@ int cdiStreamOpenDefaultDelegate(const char *filename, const char *filemode,
         return (CDI_ELIBNAVAIL);
       }
     }
+
+  streamptr->filetype = filetype;
+
   return fileID;
 }
 
@@ -766,7 +769,6 @@ int streamOpen(const char *filename, const char *filemode, int filetype)
 
       if ( streamID < 0 ) return (CDI_ELIMIT);
 
-      streamptr->filetype = filetype;
       streamptr->filemode = tolower(*filemode);
       streamptr->filename = strdupx(filename);
       streamptr->fileID   = fileID;
@@ -818,7 +820,6 @@ static int streamOpenA(const char *filename, const char *filemode, int filetype)
 
   streamID = streamptr->self;
 
-  streamptr->filetype = filetype;
   streamptr->filemode = tolower(*filemode);
   streamptr->filename = strdupx(filename);
   streamptr->fileID   = fileID;