Merge branch 'master' of git://factorcode.org/git/factor

[factor.git] / basis / ui / gadgets / tables / tables.factor

diff --git a/basis/ui/gadgets/tables/tables.factor b/basis/ui/gadgets/tables/tables.factor
index c0b792785dc75f729ab7e4b5a96e741701b7f52e..353dd912701ee825e2d2a282bb61e2814b533e13 100644 (file)
--- a/basis/ui/gadgets/tables/tables.factor
+++ b/basis/ui/gadgets/tables/tables.factor
@@ -354,13 +354,14 @@ PRIVATE>
     if ;
 
 : row-action? ( table -- ? )
-    [ [ mouse-row ] keep valid-line? ]
-    [ single-click?>> hand-click# get 2 = or ] bi and ;
+    single-click?>> hand-click# get 2 = or ;
 
 <PRIVATE
 
 : table-button-up ( table -- )
-    dup row-action? [ row-action ] [ update-selected-values ] if ;
+    dup [ mouse-row ] keep valid-line? [
+        dup row-action? [ row-action ] [ update-selected-values ] if
+    ] [ drop ] if ;
 
 PRIVATE>