From 18259cdaa4ec36eeb94b564c596c14c6d0ff154e Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Mon, 15 Oct 2007 06:23:00 -0400
Subject: [PATCH] Fix interactor problem when loading a vocab which has a parse
 error

---
 extra/ui/tools/interactor/interactor.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/ui/tools/interactor/interactor.factor b/extra/ui/tools/interactor/interactor.factor
index d0791ac5ab..ca70895b09 100644
--- a/extra/ui/tools/interactor/interactor.factor
+++ b/extra/ui/tools/interactor/interactor.factor
@@ -137,7 +137,7 @@ M: interactor stream-read-partial
             [ restore-vars parse ] keep save-vars
         ] [
             >r f swap set-interactor-busy? drop r>
-            dup [ unexpected-eof? ] is? [ drop f ] when
+            dup delegate unexpected-eof? [ drop f ] when
         ] recover
     ] with-scope ;