summaryrefslogtreecommitdiff
path: root/bin/PerlACE/Process_Win32.pm
diff options
context:
space:
mode:
Diffstat (limited to 'bin/PerlACE/Process_Win32.pm')
-rw-r--r--bin/PerlACE/Process_Win32.pm6
1 files changed, 2 insertions, 4 deletions
diff --git a/bin/PerlACE/Process_Win32.pm b/bin/PerlACE/Process_Win32.pm
index 224afc65bfd..e7bb3fe63df 100644
--- a/bin/PerlACE/Process_Win32.pm
+++ b/bin/PerlACE/Process_Win32.pm
@@ -112,9 +112,7 @@ sub Executable
$executable = PerlACE::Process::Normalize_Executable_Name ($executable);
}
else {
- if ($executable !~ m/.EXE$/i) {
- $executable = $executable.".EXE";
- }
+ $executable = $executable.".EXE";
$executable =~ s/\//\\/g; # / <- # color coding issue in devenv
}
@@ -278,7 +276,7 @@ sub Spawn ()
if ($status != $STILL_ACTIVE) {
print STDERR "ERROR: Spawn failed for <", $self->CommandLine (), ">\n";
- return -1;
+ exit $status;
}
$self->{RUNNING} = 1;