aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compat.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-20 21:49:59 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-20 21:49:59 +0000
commit1e67a3445ddda759c38b455494350ed00390d73f (patch)
tree720721577c197b4ff455f25ad767c9a8de5c5d94 /src/interp/compat.boot
parent517b9dd50dcdf3f7881d5f682e8217174d03a211 (diff)
downloadopen-axiom-1e67a3445ddda759c38b455494350ed00390d73f.tar.gz
more cleanup
Diffstat (limited to 'src/interp/compat.boot')
-rw-r--r--src/interp/compat.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/compat.boot b/src/interp/compat.boot
index 712037f4..964d2dab 100644
--- a/src/interp/compat.boot
+++ b/src/interp/compat.boot
@@ -52,7 +52,7 @@ rwrite(key,val,stream) ==
system() ==
-- VM version of system command
string := getSystemCommandLine()
- if string = '"" then string := '"sh"
+ if string is '"" then string := '"sh"
sayMessage ['" Return Code = ", runCommand string]
terminateSystemCommand()