--- a/DataSetColumn.st Fri Dec 21 12:01:58 2001 +0100
+++ b/DataSetColumn.st Tue Jan 15 17:21:14 2002 +0100
@@ -889,6 +889,23 @@
^ containsText
!
+doubleClickOn:aRowNr
+ |sel|
+
+ (sel := self doubleClickedSelector) notNil ifTrue:[
+ columnAdaptor notNil ifTrue:[
+ sel numArgs == 2 ifTrue:[
+ ^ columnAdaptor perform:sel with:(dataSet at:aRowNr) with:columnNumber
+ ].
+ ^ columnAdaptor perform:sel with:(dataSet at:aRowNr)
+ ].
+ sel numArgs == 1 ifTrue:[
+ ^ (dataSet at:aRowNr) perform:sel with:columnNumber
+ ].
+ ^ (dataSet at:aRowNr) perform:sel
+ ].
+!
+
hasChoices:aRowNr
^ (description choicesFor:(dataSet at:aRowNr)) notNil
!
@@ -1035,5 +1052,5 @@
!DataSetColumn class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DataSetColumn.st,v 1.71 2001-12-14 10:49:04 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DataSetColumn.st,v 1.72 2002-01-15 16:21:14 martin Exp $'
! !