[svn:parrot] r19023 - trunk/src/pmc

[particle]

Author: particle
Date: Fri Jun 15 11:40:04 2007
New Revision: 19023

Modified:
   trunk/src/pmc/os.pmc

Log:
[pmc]: capitalize drive letter for 'cwd' method on win32/msvc

Modified: trunk/src/pmc/os.pmc
==============================================================================
--- trunk/src/pmc/os.pmc        (original)
+++ trunk/src/pmc/os.pmc        Fri Jun 15 11:40:04 2007
@@ -73,6 +73,8 @@
         char * cwd;
 #ifdef _MSC_VER
         cwd = _getcwd(NULL, 0);
+        /* capitalize the drive letter */
+        cwd[0] = toupper(cwd[0]);
 #else
 #  ifdef PATH_MAX
         cwd = getcwd(NULL, PATH_MAX+1);