From 748231e3d145e1a3c5c67ac5d91a4fe9243ef1ba Mon Sep 17 00:00:00 2001
From: sheeple <sheeple@joy.internal.stack-effects.com>
Date: Tue, 12 Feb 2008 11:42:43 -0600
Subject: [PATCH] Fix Linux bootstrap

---
 core/bootstrap/stage2.factor     | 3 ++-
 extra/io/unix/linux/linux.factor | 4 ++--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/core/bootstrap/stage2.factor b/core/bootstrap/stage2.factor
index 9dd56c6524..cd99796e7e 100755
--- a/core/bootstrap/stage2.factor
+++ b/core/bootstrap/stage2.factor
@@ -111,7 +111,8 @@ SYMBOL: bootstrap-time
         "output-image" get resource-path save-image-and-exit
     ] if
 ] [
-    print-error :c restarts.
+    :c
+    print-error restarts.
     "listener" vocab-main execute
     1 exit
 ] recover
diff --git a/extra/io/unix/linux/linux.factor b/extra/io/unix/linux/linux.factor
index 960f0652fc..70f8038baf 100755
--- a/extra/io/unix/linux/linux.factor
+++ b/extra/io/unix/linux/linux.factor
@@ -42,8 +42,8 @@ TUPLE: inotify watches ;
     [ <linux-monitor> dup ] keep watches set-at ;
 
 : remove-watch ( monitor -- )
-    dup linux-monitor-wd watches delete-at
-    linux-monitor-wd inotify-fd swap inotify_rm_watch io-error ;
+    dup simple-monitor-handle watches delete-at
+    simple-monitor-handle inotify-fd swap inotify_rm_watch io-error ;
 
 M: linux-io <monitor> ( path recursive? -- monitor )
     drop IN_CHANGE_EVENTS add-watch ;