Changeset 10565

Timestamp:

02/07/10 03:22:19 (7 months ago)

Author:

azawawi

Message:

Fixed failed copying for wperl.exe.manifiest

Files:

• trunk/Padre/privinc/Module/Install/PRIVATE/Padre.pm (modified) (2 diffs)

trunk/Padre/privinc/Module/Install/PRIVATE/Padre.pm

@@ -241 +241 @@
         # source folder
         my $src = "win32-loader";
+        my $bin = "blib/bin";
 
         # Create the blib/bin folder
-        system $^X , qw[-MExtUtils::Command -e mkpath --], qw[ blib/bin ];
+        system $^X , qw[-MExtUtils::Command -e mkpath --], $bin;
 
         # Step 1: Make sure we do not have old files
@@ -252 +253 @@
 
         # Step 3: Build padre.exe using gcc
-        system "cd $src && gcc -Wall -Os -mwin32 -mwindows -Wl,-s padre.c padre-rc.o -o ../blib/bin/padre.exe";
-
-        # Remove temporary file
+        system "cd $src && gcc -Wall -Os -mwin32 -mwindows -Wl,-s padre.c padre-rc.o -o ../$bin/padre.exe";
+
+        # Step 4: Remove temporary files
         unlink "$src/padre-rc.o" if -f "$src/padre-rc.o";
 
-        # Step 4: Install XP manifest to get a themed Padre
-        system $^X , qw[-MExtUtils::Command -e cp --], qw[ $src/wperl.exe.manifest blib/bin/wperl.exe.manifest ];
+        # Step 5: Install XP manifest to get a themed Padre
+        system $^X , qw[-MExtUtils::Command -e cp --], "$src/wperl.exe.manifest", "$bin/wperl.exe.manifest";
 }