--- a/SelListV.st	Sat Mar 13 13:52:26 1999 +0100
+++ b/SelListV.st	Sun Mar 14 14:02:31 1999 +0100
@@ -2474,6 +2474,15 @@
     "Modified: / 15.9.1998 / 18:22:31 / cg"
 !
 
+pointerEnter:state x:x y:y
+    "mouse pointer moved into my view;
+     Since I process keyboard events (to position on an entry and/or
+     for scrolling), request the focus."
+
+    self requestFocus. 
+    super pointerEnter:state x:x y:y
+!
+
 sizeChanged:how
     "if there is a selection, make certain, its visible
      after the sizechange"
@@ -3614,5 +3623,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.139 1999-03-07 13:33:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.140 1999-03-14 13:02:31 cg Exp $'
 ! !

--- a/SelectionInListView.st	Sat Mar 13 13:52:26 1999 +0100
+++ b/SelectionInListView.st	Sun Mar 14 14:02:31 1999 +0100
@@ -2474,6 +2474,15 @@
     "Modified: / 15.9.1998 / 18:22:31 / cg"
 !
 
+pointerEnter:state x:x y:y
+    "mouse pointer moved into my view;
+     Since I process keyboard events (to position on an entry and/or
+     for scrolling), request the focus."
+
+    self requestFocus. 
+    super pointerEnter:state x:x y:y
+!
+
 sizeChanged:how
     "if there is a selection, make certain, its visible
      after the sizechange"
@@ -3614,5 +3623,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.139 1999-03-07 13:33:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.140 1999-03-14 13:02:31 cg Exp $'
 ! !