UIGalleryView.st
changeset 683 648ba2c8536e
parent 661 34af6869d5b8
child 720 7f228c9cde2e
--- 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 ].
 
 ! !