take focus on pointer enter only if the list is not empty.
authorClaus Gittinger <cg@exept.de>
Mon, 19 Nov 2001 16:27:46 +0100
changeset 2055 964a2cac4e55
parent 2054 bf9933e70737
child 2056 b34a774d3a2b
take focus on pointer enter only if the list is not empty. findGuiResources... now sets the receiver, if not yet set
SelectionInListModelView.st
--- a/SelectionInListModelView.st	Sat Nov 17 15:22:32 2001 +0100
+++ b/SelectionInListModelView.st	Mon Nov 19 16:27:46 2001 +0100
@@ -864,7 +864,7 @@
 
                 appl notNil ifTrue:[
                     menu findGuiResourcesIn:appl.
-                    menu receiver:appl
+                    "/ menu receiver:appl  -- now done in findGuiResources ...
                 ] ifFalse:[
                     menu receiver:item
                 ]
@@ -1152,11 +1152,11 @@
     (pref ~~ false
     and:[(styleSheet at:#'selection.requestFocusOnPointerEnter' default:true)
     ]) ifTrue:[
-        ^ true
+        list size > 0 ifTrue:[
+            ^ true
+        ]
     ].
     ^ false
-
-
 ! !
 
 !SelectionInListModelView methodsFor:'initialize / release'!
@@ -1672,5 +1672,5 @@
 !SelectionInListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.44 2001-01-25 17:35:08 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.45 2001-11-19 15:27:46 cg Exp $'
 ! !