add method: #invalidate
invalidate all dependent views; useful if only a
name or enabled state changed (no recomputation).
--- a/SelInTree.st Fri Feb 13 14:54:42 1998 +0100
+++ b/SelInTree.st Fri Feb 13 14:56:35 1998 +0100
@@ -228,6 +228,19 @@
self selectionIndex:nil
! !
+!SelectionInTree methodsFor:'change & update'!
+
+invalidate
+ "called; something changed what requires a redraw but no recomputation.
+ for example a name
+ "
+ self dependents do:[:aDependent|
+ aDependent isView ifTrue:[ aDependent invalidate ]
+ ].
+
+
+! !
+
!SelectionInTree methodsFor:'enumerating'!
each:something do:aBlock
@@ -322,5 +335,5 @@
!SelectionInTree class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelInTree.st,v 1.7 1997-10-29 08:25:29 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelInTree.st,v 1.8 1998-02-13 13:56:35 ca Exp $'
! !
--- a/SelectionInTree.st Fri Feb 13 14:54:42 1998 +0100
+++ b/SelectionInTree.st Fri Feb 13 14:56:35 1998 +0100
@@ -228,6 +228,19 @@
self selectionIndex:nil
! !
+!SelectionInTree methodsFor:'change & update'!
+
+invalidate
+ "called; something changed what requires a redraw but no recomputation.
+ for example a name
+ "
+ self dependents do:[:aDependent|
+ aDependent isView ifTrue:[ aDependent invalidate ]
+ ].
+
+
+! !
+
!SelectionInTree methodsFor:'enumerating'!
each:something do:aBlock
@@ -322,5 +335,5 @@
!SelectionInTree class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.7 1997-10-29 08:25:29 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.8 1998-02-13 13:56:35 ca Exp $'
! !