diff -r 9fcd010d8fd3 -r 648ba2c8536e UIGalleryView.st --- 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 ]. ! !