From 7324e583a1ab8a05e64b213fd0d74843f944d8ba Mon Sep 17 00:00:00 2001
From: "Jose A. Ortega Ruiz" <jao@gnu.org>
Date: Tue, 27 Jan 2009 10:34:25 +0100
Subject: [PATCH] FUEL: capture restarts in remote connections

---
 extra/fuel/remote/remote.factor | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/extra/fuel/remote/remote.factor b/extra/fuel/remote/remote.factor
index 454265d5d8..d13aff800a 100644
--- a/extra/fuel/remote/remote.factor
+++ b/extra/fuel/remote/remote.factor
@@ -1,18 +1,21 @@
 ! Copyright (C) 2009 Jose Antonio Ortega Ruiz.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors io io.encodings.utf8 io.servers.connection kernel
-listener math ;
+USING: accessors debugger io io.encodings.utf8 io.servers.connection
+kernel listener math namespaces ;
 
 IN: fuel.remote
 
 <PRIVATE
 
+: start-listener ( -- )
+    [ [ print-error-and-restarts ] error-hook set listener ] with-scope ;
+
 : server ( port -- server )
     <threaded-server>
         "tty-server" >>name
         utf8 >>encoding
         swap local-server >>insecure
-        [ listener ] >>handler
+        [ start-listener ] >>handler
         f >>timeout ;
 
 : print-banner ( -- )