fix windows launcher code

db4
Doug Coleman 2008-01-29 12:13:08 -06:00
parent 2ae344d2b6
commit 44d058c676
1 changed files with 1 additions and 1 deletions

View File

@ -51,7 +51,7 @@ TUPLE: CreateProcess-args
[ [ dup CHAR: " = [ CHAR: \\ , ] when , ] each ] "" make ;
: join-arguments ( args -- cmd-line )
[ "\"" swap escape-argument "\"" 3append ] map " " join ;
" " join ;
: app-name/cmd-line ( -- app-name cmd-line )
+command+ get [