command-line: enable "quiet" mode for -e or script modes before .factor-rc is loaded
parent
9f93d4bff7
commit
237d0733c6
|
@ -92,16 +92,18 @@ from within Factor for more information.
|
|||
|
||||
: command-line-startup ( -- )
|
||||
(command-line) parse-command-line
|
||||
load-vocab-roots
|
||||
run-user-init
|
||||
|
||||
"help" get "-help" get or "h" get or [ cli-usage ] [
|
||||
"e" get script get or [
|
||||
"e" get [ eval( -- ) ] when*
|
||||
script get [ run-script ] when*
|
||||
] [
|
||||
"run" get run
|
||||
] if
|
||||
"e" get script get or "quiet" [
|
||||
load-vocab-roots
|
||||
run-user-init
|
||||
|
||||
"e" get script get or [
|
||||
"e" get [ eval( -- ) ] when*
|
||||
script get [ run-script ] when*
|
||||
] [
|
||||
"run" get run
|
||||
] if
|
||||
] with-variable
|
||||
] if
|
||||
|
||||
output-stream get [ stream-flush ] when*
|
||||
|
|
Loading…
Reference in New Issue