--- a/DSVColumnView.st Mon Jun 14 13:02:20 2010 +0200
+++ b/DSVColumnView.st Wed Jun 16 16:09:12 2010 +0200
@@ -2417,7 +2417,9 @@
].
clickedIntoSelection := self isInSelection:rowNr.
- clickedIntoSelection ifTrue:[ |selColIdx|
+ clickedIntoSelection ifTrue:[
+ |selColIdx|
+
selColIdx := self selectedColIndex.
(selColIdx ~~ 0 and:[selColIdx ~~ colNr]) ifTrue:[
@@ -2439,7 +2441,9 @@
].
buttonMotionAction := [:p|
- (self bounds containsPoint:p) ifTrue:[ |rowUnderPoint|
+ (self bounds containsPoint:p) ifTrue:[
+ |rowUnderPoint|
+
rowUnderPoint := self yVisibleToRowNr:(p y).
rowUnderPoint notNil ifTrue:[
@@ -2454,6 +2458,8 @@
]
].
].
+
+ "Modified: / 16-06-2010 / 16:06:32 / cg"
!
buttonRelease:button x:x y:y
@@ -4609,9 +4615,9 @@
!DSVColumnView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.256 2010-05-06 08:27:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.257 2010-06-16 14:09:12 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.256 2010-05-06 08:27:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.257 2010-06-16 14:09:12 cg Exp $'
! !