command-line: if run is specified first non-param starts the command-line.

db4
John Benediktsson 2012-08-13 16:42:56 -07:00
parent dda43cc647
commit 36a4a59efc
1 changed files with 4 additions and 1 deletions

View File

@ -66,7 +66,10 @@ SYMBOL: command-line
[ command-line off script off ] [
unclip "-" ?head
[ param parse-command-line ]
[ script set command-line set ] if
[
"run" get-global [ prefix f ] when
script set command-line set
] if
] if-empty ;
SYMBOL: main-vocab-hook