command-line,tools.deploy.shaker: removes refs to executable which i forgot

char-rename
Björn Lindqvist 2016-09-27 00:31:35 +02:00
parent d18fbb1678
commit c42c7aabbc
2 changed files with 13 additions and 14 deletions

View File

@ -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

View File

@ -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 ;