summaryrefslogtreecommitdiff
path: root/bin/PerlACE
diff options
context:
space:
mode:
authoroci <oci@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2001-03-09 20:38:43 +0000
committeroci <oci@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2001-03-09 20:38:43 +0000
commit94ab75a47c76d9a4e039813d0907c6fdac29f799 (patch)
tree284087a793e4d2a92a40111ab78a2c31dc19ca33 /bin/PerlACE
parentae19ff0d650290032be3005d8bb383d762d52495 (diff)
downloadATCD-94ab75a47c76d9a4e039813d0907c6fdac29f799.tar.gz
ChangeLogTag: Fri Mar 9 14:34:34 2001 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'bin/PerlACE')
-rw-r--r--bin/PerlACE/Process_Unix.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/PerlACE/Process_Unix.pm b/bin/PerlACE/Process_Unix.pm
index 65740f63951..a7ca2127a76 100644
--- a/bin/PerlACE/Process_Unix.pm
+++ b/bin/PerlACE/Process_Unix.pm
@@ -182,7 +182,7 @@ sub Spawn ()
return -1;
}
- if (!-x $self->Executable ()) {
+ if (!$PerlACE::Process::chorus && !-x $self->Executable ()) {
print STDERR "ERROR: Cannot Spawn: <", $self->Executable (),
"> not executable\n";
return -1;