<p><b>duda</b> 2012-04-03 14:57:13 -0600 (Tue, 03 Apr 2012)</p><p>BRANCH COMMIT<br>
<br>
To avoid problems with colons in filenames when using pnetcdf, substitute<br>
all ':' characters with '.' in input and output filenames; it should be trivial<br>
to change to a different character in future if we choose.<br>
<br>
<br>
M    src/framework/mpas_io_input.F<br>
M    src/framework/mpas_io_output.F<br>
</p><hr noshade><pre><font color="gray">Modified: branches/omp_blocks/io/src/framework/mpas_io_input.F
===================================================================
--- branches/omp_blocks/io/src/framework/mpas_io_input.F        2012-04-03 18:01:44 UTC (rev 1743)
+++ branches/omp_blocks/io/src/framework/mpas_io_input.F        2012-04-03 20:57:13 UTC (rev 1744)
@@ -1230,6 +1230,10 @@
          end if
       end do
 
+      do i=1,len_trim(filename)
+         if (filename(i:i) == ':') filename(i:i) = '.'
+      end do
+
    end subroutine mpas_insert_string_suffix
 
 

Modified: branches/omp_blocks/io/src/framework/mpas_io_output.F
===================================================================
--- branches/omp_blocks/io/src/framework/mpas_io_output.F        2012-04-03 18:01:44 UTC (rev 1743)
+++ branches/omp_blocks/io/src/framework/mpas_io_output.F        2012-04-03 20:57:13 UTC (rev 1744)
@@ -138,6 +138,10 @@
          end if
       end do
 
+      do i=1,len_trim(filename)
+         if (filename(i:i) == ':') filename(i:i) = '.'
+      end do
+
    end subroutine mpas_insert_string_suffix
 
 

</font>
</pre>