tools.deploy.shaker: don't strip out io-thread, since new thread implementation requi...

diff --git a/basis/tools/deploy/shaker/shaker.factor b/basis/tools/deploy/shaker/shaker.factor
index e7eea1179ad5a9de1c102845c8bafb79ba20bb81..21f28d6ae2578f438b16d9d6ebef811135cc58eb 100755 (executable)
--- a/basis/tools/deploy/shaker/shaker.factor
+++ b/basis/tools/deploy/shaker/shaker.factor
@@ -42,12 +42,8 @@ IN: tools.deploy.shaker
     deploy-threads? get [
         "threads" startup-hooks get delete-at
     ] unless
-    native-io? [
-        "io.thread" startup-hooks get delete-at
-    ] unless
     strip-io? [
         "io.backend" startup-hooks get delete-at
-        "io.thread" startup-hooks get delete-at
     ] when
     strip-dictionary? [
         {
@@ -402,9 +398,6 @@ IN: tools.deploy.shaker
         [
             c-io-backend forget
             "io.streams.c" forget-vocab
-            "io-thread-running?" "io.thread" lookup [
-                global delete-at
-            ] when*
         ] with-compilation-unit
     ] when ;