HierarchicalListView.st
changeset 3204 3b6de876f7a2
parent 3200 c5f79c9b5bd8
child 3234 53f4c03b615a
--- a/HierarchicalListView.st	Tue Mar 13 07:32:32 2007 +0100
+++ b/HierarchicalListView.st	Tue Mar 13 16:16:28 2007 +0100
@@ -1113,6 +1113,8 @@
 
     |line item x0 y0|
 
+    modelChangedDuringButtonPress := nil.
+
     enabled ifFalse:[^ self].
     self closeEditor.        
 
@@ -1177,18 +1179,6 @@
     ].
 !
 
-buttonRelease:button x:x y:y
-    "make selection visible after button release
-    "
-    super buttonRelease:button x:x y:y.
-
-    (button == 1 or:[button == #select]) ifTrue:[
-        self hasSelection ifTrue:[
-            self makeSelectionVisible.
-        ].
-    ].
-!
-
 keyPress:aKey x:x y:y
     "a key was pressed - handle page-keys here
     "
@@ -1662,5 +1652,5 @@
 !HierarchicalListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.105 2007-03-12 15:23:59 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.106 2007-03-13 15:16:28 ca Exp $'
 ! !