--- a/ObjectView.st	Fri Mar 26 15:13:01 1999 +0100
+++ b/ObjectView.st	Fri Mar 26 18:54:54 1999 +0100
@@ -1325,7 +1325,9 @@
 pointerEnter:state x:x y:y
     "mouse pointer entered - request the keyboard focus"
 
-    self requestFocus.
+    UserPreferences current focusFollowsMouse == true ifTrue:[
+        self requestFocus.
+    ].
     super pointerEnter:state x:x y:y
 
 
@@ -3079,5 +3081,5 @@
 !ObjectView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.65 1999-03-25 14:33:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.66 1999-03-26 17:54:26 cg Exp $'
 ! !