--- a/DSVColumnView.st Mon Mar 26 15:22:19 2007 +0200
+++ b/DSVColumnView.st Mon Mar 26 15:22:21 2007 +0200
@@ -2195,6 +2195,8 @@
buttonMultiPress:button x:x y:y
"a button was pressed twice - handle doubleclick here"
+ |selectedCol|
+
buttonMotionAction := buttonReleaseAction := nil.
self isEnabled ifFalse:[^ self].
@@ -2204,13 +2206,16 @@
].
self numberOfSelections == 1 ifTrue:[
self firstIndexSelected == (self yVisibleToRowNr:y) ifTrue:[
- ( self selectedColIndex == 0
- or:[self selectedColIndex == (self xVisibleToColNr:x)]
+ selectedCol := self selectedColIndex.
+ ( selectedCol == 0
+ or:[selectedCol == (self xVisibleToColNr:x)]
) ifTrue:[
self doubleClicked
]
]
]
+
+ "Modified: / 26-03-2007 / 15:19:04 / cg"
!
buttonPress:button x:x y:y
@@ -2817,7 +2822,7 @@
columnDescriptors isEmpty ifTrue:[^ nil].
colNr := self xVisibleToColNr:aPoint x.
- colNr ~~ 0 ifTrue:[
+ colNr notNil ifTrue:[
col := columnDescriptors at:colNr.
^ col activeHelpText.
].
@@ -3208,7 +3213,8 @@
!
xVisibleToColNr:x
- "returns the column number assigned to a physical x or nil"
+ "returns the column number for a physical x position.
+ Returns nil if x is behond the last column."
|x0|
@@ -3219,7 +3225,7 @@
].
^ nil.
- "Modified: / 26-03-2007 / 14:45:26 / cg"
+ "Modified: / 26-03-2007 / 15:22:01 / cg"
!
yVisibleOfRowNr:aRowNr
@@ -4323,5 +4329,5 @@
!DSVColumnView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.223 2007-03-26 12:44:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.224 2007-03-26 13:22:21 cg Exp $'
! !