From 248cb0df5ed7bf97c7fdd08bc647293934350a50 Mon Sep 17 00:00:00 2001
From: slava <slava@slava-laptop.(none)>
Date: Thu, 20 Nov 2008 03:47:39 -0600
Subject: [PATCH] Add some error checking to the X11 UI: if an event handler
 throws an error, we open a debugger window, as on other platforms, instead of
 stopping the UI

---
 basis/ui/x11/x11.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/ui/x11/x11.factor b/basis/ui/x11/x11.factor
index e3c8421080..fd599635b1 100644
--- a/basis/ui/x11/x11.factor
+++ b/basis/ui/x11/x11.factor
@@ -185,7 +185,7 @@ M: world client-event
 
 M: x11-ui-backend do-events
     wait-event dup XAnyEvent-window window dup
-    [ [ 2dup handle-event ] assert-depth ] when 2drop ;
+    [ [ [ 2dup handle-event ] ui-try ] assert-depth ] when 2drop ;
 
 : x-clipboard@ ( gadget clipboard -- prop win )
     atom>> swap