From 7b82287b36a54b0ac78e82f9d8ad468cb889a4e4 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 9 May 2010 05:19:46 +0000
Subject: Fix typo.

---
 src/interp/sys-os.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/interp/sys-os.boot b/src/interp/sys-os.boot
index aae3dad3..9ace7b71 100644
--- a/src/interp/sys-os.boot
+++ b/src/interp/sys-os.boot
@@ -187,7 +187,7 @@ import oa__system: string -> int for runCommand
 ++ run a program with specified arguments
 runProgram(prog,args) ==
 )if %hasFeature KEYWORD::GCL
-  SYSTEM::SYSTEM CONCAT/[prog,:[:['" ",a] for a in args]]
+  SYSTEM::SYSTEM(CONCAT/[prog,:[:['" ",a] for a in args]])
 )elseif %hasFeature KEYWORD::CLISP
   EXT::RUN_-PROGRAM(prog,KEYWORD::ARGUMENTS,args)
 )elseif %hasFeature KEYWORD::SBCL
-- 
cgit v1.2.3