command-line: if run is specified first non-param starts the command-line.
parent
dda43cc647
commit
36a4a59efc
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue