--- 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 $'
! !