[perl #64054] Can't exec "C:/Program": No such file or directory at build/gen_parrot.pl line 63.

[Vasily Chekalkin via RT]

On Sat Mar 21 06:28:26 2009, Cybera wrote:

> Checked out revision 37535.
> Can't exec "C:/Program": No such file or directory at
>    build/gen_parrot.pl line 63.

Attached patch solves this (and possible some other issues)

-- 
Bacek


diff --git a/build/gen_parrot.pl b/build/gen_parrot.pl
index f20e2e6..22fa9b3 100644
--- a/build/gen_parrot.pl
+++ b/build/gen_parrot.pl
@@ -44,7 +44,7 @@ close $REQ;
 }
 
 print "Checking out Parrot r$required via svn...\n";
-system("svn checkout -r $required https://svn.parrot.org/parrot/trunk parrot");
+system("svn", split(' ', "checkout -r $required https://svn.parrot.org/parrot/trunk parrot"));
 
 chdir('parrot');
 
@@ -55,12 +55,12 @@ if (-f 'Makefile') {
     my $make = $config{'make'};
     if ($make) {
         print "Performing '$make realclean'\n";
-        system("$make realclean");
+        system($make, "realclean");
     }
 }
 
 ##  Configure Parrot
-system("$^X Configure.pl");
+system($^X, "Configure.pl");
 
 my %config = read_parrot_config();
 my $make = $config{'make'};