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