SelectionInListModelView.st
changeset 5158 ed46714ec203
parent 5083 6cd08a5a19a6
child 5215 949e2a560b6c
--- a/SelectionInListModelView.st	Mon Jul 11 14:58:33 2016 +0200
+++ b/SelectionInListModelView.st	Tue Jul 12 16:53:26 2016 +0200
@@ -1328,17 +1328,14 @@
 
     enabled ifFalse:[^ self].
 
-    (button == 1) ifTrue:[
+    button == 1 ifTrue:[
         (     (lnNr := self yVisibleToLineNr:y)   notNil
          and:[(self at:lnNr ifAbsent:nil) notNil]
         ) ifTrue:[
-            self selectedIndex == lnNr ifFalse:[
+            self selectedIndex ~~ lnNr ifTrue:[
                 self breakPoint:#ca
             ].
             self doubleClicked.
-"/            doubleClickActionBlock notNil ifTrue:[
-"/                doubleClickActionBlock valueWithOptionalArgument:lnNr and:self.
-"/            ].
         ].
         ^ self.
     ].