aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compat.boot
diff options
context:
space:
mode:
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()