FUEL: capture restarts in remote connections

diff --git a/extra/fuel/remote/remote.factor b/extra/fuel/remote/remote.factor
index 454265d5d86d7a69c4770d2b226ca29b18ab0a69..d13aff800a4290d44d7bcf46e93aa3872308bf9d 100644 (file)
--- 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 ( -- )