diff --git a/extra/ui/cocoa/views/views.factor b/extra/ui/cocoa/views/views.factor
index 5ab3ec28f3..a965e8a30c 100755
--- a/extra/ui/cocoa/views/views.factor
+++ b/extra/ui/cocoa/views/views.factor
@@ -297,7 +297,7 @@ CLASS: {
 { "updateFactorGadgetSize:" "void" { "id" "SEL" "id" }
     [
         [
-            2drop dup view-dim swap window set-gadget-dim
+            2drop dup view-dim swap window set-gadget-dim yield
         ] ui-try
     ]
 }
diff --git a/extra/ui/gestures/gestures.factor b/extra/ui/gestures/gestures.factor
index e494afd46d..574b71c44d 100755
--- a/extra/ui/gestures/gestures.factor
+++ b/extra/ui/gestures/gestures.factor
@@ -119,7 +119,8 @@ SYMBOL: drag-timer
 
 : stop-drag-timer ( -- )
     hand-buttons get-global empty? [
-        drag-timer get-global box> cancel-alarm
+        drag-timer get-global ?box
+        [ cancel-alarm ] [ drop ] if
     ] when ;
 
 : fire-motion ( -- )
diff --git a/extra/ui/windows/windows.factor b/extra/ui/windows/windows.factor
index a1b513380c..f65f293ca4 100755
--- a/extra/ui/windows/windows.factor
+++ b/extra/ui/windows/windows.factor
@@ -340,7 +340,7 @@ H{ } clone wm-handlers set-global
 [ 4dup handle-wm-keydown DefWindowProc ] { WM_KEYDOWN WM_SYSKEYDOWN } add-wm-handler
 [ 4dup handle-wm-char DefWindowProc    ] { WM_CHAR WM_SYSCHAR }       add-wm-handler
 [ 4dup handle-wm-keyup DefWindowProc   ] { WM_KEYUP WM_SYSKEYUP }     add-wm-handler
-               
+
 [ handle-wm-syscommand   ] WM_SYSCOMMAND add-wm-handler
 [ handle-wm-set-focus 0  ] WM_SETFOCUS add-wm-handler
 [ handle-wm-kill-focus 0 ] WM_KILLFOCUS add-wm-handler