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

diff --git a/basis/command-line/command-line-tests.factor b/basis/command-line/command-line-tests.factor
index d11c69e69bb9c13192f18b6d0ff5f6ca5b6c2bc3..f9dd067000b64f37acb311a6752fc9aa9a61bc08 100644 (file)
--- a/basis/command-line/command-line-tests.factor
+++ b/basis/command-line/command-line-tests.factor
@@ -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

diff --git a/basis/tools/deploy/shaker/shaker.factor b/basis/tools/deploy/shaker/shaker.factor
index 5ab6245b7c38d2e88102480b088f23cb23051df2..a6559a19e14c611127ceadae283293c90e2833ed 100755 (executable)
--- a/basis/tools/deploy/shaker/shaker.factor
+++ b/basis/tools/deploy/shaker/shaker.factor
@@ -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 ;