ui.backend.gtk: don't initialize io event source when deploying with io level 1 and 2

diff --git a/basis/ui/backend/gtk/gtk.factor b/basis/ui/backend/gtk/gtk.factor
index 441e02a04fd91de6943159bc7d677c39efe6f7a7..2285453e5f3ea6fde76eb036d2df1ce786017c9a 100644 (file)
--- a/basis/ui/backend/gtk/gtk.factor
+++ b/basis/ui/backend/gtk/gtk.factor
@@ -229,8 +229,8 @@ CONSTANT: poll-fd-events
 
 HOOK: init-io-event-source io-backend ( -- )
 
-M: c-io-backend init-io-event-source
-    ;
+M: f init-io-event-source ;
+M: c-io-backend init-io-event-source ;
 
 M: object init-io-event-source
     GSourceFuncs malloc-struct &free

diff --git a/extra/hello-ui/deploy.factor b/extra/hello-ui/deploy.factor
index cf851f5a95e9f7c9201607a437f72dfa93212d86..ceff9857cb4b9e77e1af419521a67526281b7a4e 100644 (file)
--- a/extra/hello-ui/deploy.factor
+++ b/extra/hello-ui/deploy.factor
@@ -5,7 +5,7 @@ H{
     { deploy-c-types? f }
     { deploy-unicode? f }
     { "stop-after-last-window?" t }
-    { deploy-io 2 }
+    { deploy-io 1 }
     { deploy-reflection 1 }
     { deploy-word-props? f }
     { deploy-math? t }