suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: 1042823755fdd4e61afcf3b04312c68a8ebb6842
This commit is contained in:
Matthew Flatt 2001-10-29 02:56:23 +00:00
parent d9f145e3e9
commit 06f9d4d900
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mzlib/process.ss
View File

@ -13,7 +13,7 @@
(define (shell-path/args who argstr) (define (shell-path/args who argstr)
(case (system-type) (case (system-type)
((unix) (append '("/bin/sh" "-c") argstr)) ((unix) (append '("/bin/sh" "-c") (list argstr)))
((windows) (let ([cmd ((windows) (let ([cmd
(let ([d (find-system-path 'sys-dir)]) (let ([d (find-system-path 'sys-dir)])
(let ([cmd (build-path d "cmd.exe")]) (let ([cmd (build-path d "cmd.exe")])