Kill environment init hook

2008-12-01 19:51:01 -06:00 · 2008-12-01 19:51:01 -06:00 · f72c951a6b
parent 9e4dfda8cd
commit f72c951a6b
1 changed files with 2 additions and 4 deletions
--- a/basis/tools/deploy/shaker/shaker.factor
+++ b/basis/tools/deploy/shaker/shaker.factor
@ -23,10 +23,8 @@ IN: tools.deploy.shaker

 : strip-init-hooks ( -- )
    "Stripping startup hooks" show
-    "cpu.x86" init-hooks get delete-at
-    "command-line" init-hooks get delete-at
-    "libc" init-hooks get delete-at
-    "system" init-hooks get delete-at
+    { "cpu.x86" "command-line" "libc" "system" "environment" }
+    [ init-hooks get delete-at ] each
    deploy-threads? get [
        "threads" init-hooks get delete-at
    ] unless