From b88b2c9b81030f39ec8b80b5c70a38990616f497 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Tue, 24 Aug 2010 23:01:37 -0400
Subject: [PATCH] io.monitors.linux: fix typo

---
 basis/io/monitors/linux/linux.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/io/monitors/linux/linux.factor b/basis/io/monitors/linux/linux.factor
index 6dcd211055..9b2440aec8 100755
--- a/basis/io/monitors/linux/linux.factor
+++ b/basis/io/monitors/linux/linux.factor
@@ -56,10 +56,10 @@ M: linux (monitor) ( path recursive? mailbox -- monitor )
 M: linux-monitor dispose* ( monitor -- )
     [ [ wd>> ] [ watches>> ] bi delete-at ]
     [
-        dup inotify>> [
+        dup inotify>> disposed>> [ drop ] [
             [ inotify>> handle>> handle-fd ] [ wd>> ] bi
             inotify_rm_watch io-error
-        ] unless-disposed
+        ] if
     ]
     [ call-next-method ]
     tri ;