]> gitweb.factorcode.org Git - factor.git/commitdiff
minesweeper: better fix for hand click.
authorJohn Benediktsson <mrjbq7@gmail.com>
Fri, 16 Feb 2018 23:48:36 +0000 (15:48 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Fri, 16 Feb 2018 23:48:36 +0000 (15:48 -0800)
extra/minesweeper/minesweeper.factor

index e66ccaf80a474bc4b310fe6cfa2ba07b53d2294c..7f6f319dc2c10b851cab211ffa77707ac27be6e8 100644 (file)
@@ -182,7 +182,8 @@ M: grid-gadget pref-dim*
     gadget pref-dim first :> width
     width 2/ 26 - 3 2array [
         gadget cells>> [ won? ] [ lost? ] bi
-        gadget hand-click-rel [ second 58 >= ] [ f ] if*
+        hand-buttons get-global empty? not
+        gadget hand-click-rel [ second 58 >= ] [ f ] if* and
         smiley-image-path gadget draw-cached-texture
     ] with-translation ;