raise selectionChanged notification in case that
list changed and an selection exists before
--- a/DSVColumnView.st Fri Mar 19 12:29:16 1999 +0100
+++ b/DSVColumnView.st Fri Mar 19 12:57:36 1999 +0100
@@ -750,10 +750,12 @@
list:aList
"set the list of rows
"
- |makeDependent|
+ |makeDependent selectionHasChanged|
"/ remove selection without redraw
+ selectionHasChanged := self hasSelection.
+
editValue notNil ifTrue:[
editValue removeDependent:self.
editValue := nil
@@ -792,8 +794,9 @@
self invalidate.
self contentsChanged.
].
-
-
+ selectionHasChanged ifTrue:[
+ self selectionChanged.
+ ].
! !
@@ -3001,5 +3004,5 @@
!DSVColumnView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.69 1999-03-19 11:29:16 tm Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.70 1999-03-19 11:57:36 tm Exp $'
! !