[svn:parrot] r41607 - trunk/config/gen/platform/win32

[bacek at svn.parrot.org]

Author: bacek
Date: Fri Oct  2 00:01:45 2009
New Revision: 41607
URL: https://trac.parrot.org/parrot/changeset/41607

Log:
[cage] Last attempt to fix win32...

Modified:
   trunk/config/gen/platform/win32/exec.c

Modified: trunk/config/gen/platform/win32/exec.c
==============================================================================
--- trunk/config/gen/platform/win32/exec.c	Thu Oct  1 23:50:43 2009	(r41606)
+++ trunk/config/gen/platform/win32/exec.c	Fri Oct  2 00:01:45 2009	(r41607)
@@ -43,7 +43,7 @@
     PROCESS_INFORMATION pi;
     int free_it = 0;
     char* cmd = (char *)mem_sys_allocate(command->strlen + 4);
-    char* shell = Parrot_getenv(interp, CONST_STRING(interp, "ComSpec"));
+    char* shell = Parrot_getenv(interp, Parrot_str_new(interp, "ComSpec", strlen("ComSpec")));
     char* cmdin = Parrot_str_to_cstring(interp, command);
 
     strcpy(cmd, "/c ");