SelectionInListModelView.st
changeset 2361 c0e70e31ac28
parent 2352 c4610dae596e
child 2365 bdf6954a0358
--- a/SelectionInListModelView.st	Fri Nov 08 13:45:53 2002 +0100
+++ b/SelectionInListModelView.st	Fri Nov 08 15:15:43 2002 +0100
@@ -944,6 +944,7 @@
     dragAccessPoint := nil.
 
     self pointerEntersItem:nil.
+    self closeEditor.        
 
     enabled ifFalse:[^ self].
 
@@ -986,11 +987,11 @@
                     ]
                 ].
                 self startUpMenu:menu.
-              ^ self
+                ^ self
             ]
         ].
         super buttonPress:button x:x y:y.
-      ^ self
+        ^ self
     ].
 
     (clickLine := lineNr) isNil ifTrue:[ ^ self ].
@@ -1877,5 +1878,5 @@
 !SelectionInListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.65 2002-11-04 16:10:50 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.66 2002-11-08 14:15:43 ca Exp $'
 ! !