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

git-svn-id: https://svn.parrot.org/parrot/trunk@19023 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
parrot · Jun 15, 2007 · 552b612 · 552b612
1 parent bb97765
commit 552b612
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/pmc/os.pmc b/src/pmc/os.pmc
@@ -73,6 +73,8 @@ Returns the current working directory.
         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);