cocoa doesn't send key-up gestures for cmd+keys

diff --git a/extra/terrain/terrain.factor b/extra/terrain/terrain.factor
index d6905144bb4a8be09da91b9d828ab329108c70bf..fb326ef534475d0a8aac50ddaad6b56f6b0b5aa8 100644 (file)
--- a/extra/terrain/terrain.factor
+++ b/extra/terrain/terrain.factor
@@ -134,7 +134,7 @@ M: terrain-world tick-length
 
 
 terrain-world H{
-    { T{ key-up { mods { A+ } } { sym "RET" } } [ toggle-fullscreen ] }
+    { T{ key-down { mods { A+ } } { sym "RET" } } [ toggle-fullscreen ] }
 } set-gestures
 
 :: handle-input ( world -- )