command-line,tools.deploy.shaker: removes refs to executable which i forgot
parent
d18fbb1678
commit
c42c7aabbc
|
@ -1,33 +1,33 @@
|
|||
USING: command-line namespaces tools.test ;
|
||||
|
||||
{ "factor" f { "a" "b" "c" } } [
|
||||
{ f { "a" "b" "c" } } [
|
||||
{ "factor" "-run=test-voc" "a" "b" "c" } parse-command-line
|
||||
executable get script get command-line get
|
||||
script get command-line get
|
||||
] unit-test
|
||||
|
||||
{ "factor" f { "-a" "b" "c" } } [
|
||||
{ f { "-a" "b" "c" } } [
|
||||
{ "factor" "-run=test-voc" "-a" "b" "c" } parse-command-line
|
||||
executable get script get command-line get
|
||||
script get command-line get
|
||||
] unit-test
|
||||
|
||||
{ "factor" f { "a" "-b" "c" } } [
|
||||
{ f { "a" "-b" "c" } } [
|
||||
{ "factor" "-run=test-voc" "a" "-b" "c" } parse-command-line
|
||||
executable get script get command-line get
|
||||
script get command-line get
|
||||
] unit-test
|
||||
|
||||
{ "factor" f { "a" "b" "-c" } } [
|
||||
{ f { "a" "b" "-c" } } [
|
||||
{ "factor" "-run=test-voc" "a" "b" "-c" } parse-command-line
|
||||
executable get script get command-line get
|
||||
script get command-line get
|
||||
] unit-test
|
||||
|
||||
{ "factor" "a" { "b" "c" } } [
|
||||
{ "a" { "b" "c" } } [
|
||||
{ "factor" "a" "b" "c" } parse-command-line
|
||||
executable get script get command-line get
|
||||
script get command-line get
|
||||
] unit-test
|
||||
|
||||
{ "factor" "a" { "b" "c" } } [
|
||||
{ "a" { "b" "c" } } [
|
||||
{ "factor" "-foo" "a" "b" "c" } parse-command-line
|
||||
executable get script get command-line get
|
||||
script get command-line get
|
||||
] unit-test
|
||||
|
||||
{ "a:b:c" } [ { "factor" "-roots=a:b:c" } parse-command-line
|
||||
|
|
|
@ -17,8 +17,7 @@ IN: tools.deploy.shaker
|
|||
|
||||
: add-command-line-hook ( -- )
|
||||
[
|
||||
(command-line) unclip
|
||||
executable set-global
|
||||
(command-line) rest
|
||||
command-line set-global
|
||||
] "command-line" startup-hooks get set-at ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue