diff -r 367b8342663e -r 5d4d3c5ca76c UIGalleryView.st --- a/UIGalleryView.st Tue Feb 27 15:15:20 2001 +0100 +++ b/UIGalleryView.st Thu Mar 29 09:15:01 2001 +0200 @@ -310,12 +310,14 @@ menuSelector "return the value of the instance variable 'menuSelector' (automatically generated)" - ^ menuSelector! + ^ menuSelector +! menuSelector:something "set the value of the instance variable 'menuSelector' (automatically generated)" - menuSelector := something.! + menuSelector := something. +! specification "get current specification @@ -485,20 +487,19 @@ " |application| - button == 1 ifTrue:[ - lastClickPoint := Point x:x y:y. - self selection:(self findObjectAtX:x y:y). - ] ifFalse:[ - lastClickPoint := nil. + (button == 1 or:[button == #select]) ifTrue:[ + lastClickPoint := Point x:x y:y. + self selection:(self findObjectAtX:x y:y). + ] ifFalse:[ + lastClickPoint := nil. - (menuSelector notNil and:[(application := self application) notNil]) ifTrue:[ - Object messageNotUnderstoodSignal handle:[:ex| - ] do:[ - application aspectFor:menuSelector - ] - ] + (menuSelector notNil and:[(application := self application) notNil]) ifTrue:[ + Object messageNotUnderstoodSignal handle:[:ex| + ] do:[ + application aspectFor:menuSelector + ] + ] ] - ! exposeX:x y:y width:w height:h