[Dart-dev] [3895] DART/trunk/utilities/utilities_mod.f90: adding the 'action=write' argument causes this to fail at open()

[nancy at ucar.edu]

An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20090601/68997cce/attachment.html 
-------------- next part --------------
Modified: DART/trunk/utilities/utilities_mod.f90
===================================================================
--- DART/trunk/utilities/utilities_mod.f90	2009-05-29 19:18:52 UTC (rev 3894)
+++ DART/trunk/utilities/utilities_mod.f90	2009-06-01 15:33:34 UTC (rev 3895)
@@ -248,7 +248,7 @@
          if (do_output_flag) write(*,*)'Trying to open file ', trim(adjustl(lname))
 
          open(logfileunit, file=trim(adjustl(lname)), form='formatted', &
-                           position='append', iostat = io )
+                           action='write', position='append', iostat = io )
          if ( io /= 0 ) then
             write(*,*)'FATAL ERROR in initialize_utilities'
             write(*,*)'  ',trim(source)