--- a/SelectionInListView.st Thu May 11 19:54:11 2006 +0200
+++ b/SelectionInListView.st Thu May 11 19:54:34 2006 +0200
@@ -2621,10 +2621,7 @@
"return true, if I want the focus when
the mouse pointer enters"
- |pref|
-
- pref := UserPreferences current focusFollowsMouse.
- (pref ~~ false
+ (UserPreferences current focusFollowsMouse ~~ false
and:[(styleSheet at:#'selection.requestFocusOnPointerEnter' default:true)
]) ifTrue:[
list size > 0 ifTrue:[
@@ -3962,5 +3959,5 @@
!SelectionInListView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.235 2006-03-17 14:00:10 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.236 2006-05-11 17:54:34 cg Exp $'
! !