whenever selection changed; reread minorKeys from
model:
so you can use #setValue: to change the minorKeys model
--- a/UIGalleryView.st Wed Feb 25 23:57:53 1998 +0100
+++ b/UIGalleryView.st Thu Feb 26 10:59:14 1998 +0100
@@ -213,6 +213,9 @@
selection := tabRaw listIndexOf:something.
+ minorKeysHolder notNil ifTrue:[
+ minorKeys := minorKeysHolder value.
+ ].
(selection notNil and:[minorKeys size >= selection]) ifTrue:[
selector := minorKeys at:selection.
@@ -264,6 +267,7 @@
canvas := Canvas.
super initialize.
+
tabRaw action:[:something| self selectionChangedTo:something ].
! !