diff options
author | Simon McQueen <simon.mcqueen@gmail.com> | 2006-03-12 11:14:33 +0000 |
---|---|---|
committer | Simon McQueen <simon.mcqueen@gmail.com> | 2006-03-12 11:14:33 +0000 |
commit | a514c7e45b24857ab0f89e6c9ac7de2a0b8d2062 (patch) | |
tree | ad817d75b5ac8b9272c85e06ee89046b8cc9dc69 /bin/PerlACE/Process_Win32.pm | |
parent | 4800567fc0609b0d468a415eee8f74e6ac49e96f (diff) | |
download | ATCD-a514c7e45b24857ab0f89e6c9ac7de2a0b8d2062.tar.gz |
ChangeLogTag: Sun Mar 12 11:00:08 UTC 2006 Simon McQueen <sm@prismtech.com>
Diffstat (limited to 'bin/PerlACE/Process_Win32.pm')
-rw-r--r-- | bin/PerlACE/Process_Win32.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/bin/PerlACE/Process_Win32.pm b/bin/PerlACE/Process_Win32.pm index e7bb3fe63df..b5e4f05f981 100644 --- a/bin/PerlACE/Process_Win32.pm +++ b/bin/PerlACE/Process_Win32.pm @@ -112,7 +112,9 @@ sub Executable $executable = PerlACE::Process::Normalize_Executable_Name ($executable); } else { - $executable = $executable.".EXE"; + if (! $executable =~ m/.EXE$/i) { + $executable = $executable.".EXE"; + } $executable =~ s/\//\\/g; # / <- # color coding issue in devenv } |