[squeak-dev] About customizing Squeak -> custom world menu?

Bob Arning arning315 at comcast.net
Sat Feb 24 16:00:29 UTC 2018


Or you could...

World on: #mouseDown send: #putUpSomeOtherMenu: to: World


On 2/24/18 9:05 AM, H. Hirzel wrote:
> Yes, implementation is easy but my question is how it should be done
> in a way that conforms to the intention of the framework code.  A
> "recommended good solution".
>
> What about using a project preference?
>
> It needs the method PasteUpMorph buildWorldMenu: evt from May 2000
>
>      buildWorldMenu: evt
> 	^(TheWorldMenu new
> 		world: self
> 		project: (self project ifNil: [Project current])       "mvc??"
> 		hand: evt hand) buildWorldMenu.
>
>
> to be replaced with
>
>
>          buildWorldMenu: evt
>          |project worldMenuClassSymbol|
>
>          project := self project ifNil: [Project current]  "mvc??".
>
>          worldMenuClassSymbol := project
> projectPreferenceFlagDictionary at:
> #worldMenuClassSymbol ifAbsent: [#TheWorldMenu].
>
>      ^((Smalltalk at:  worldMenuClassSymbol) new
> 		world: self
> 		project: project
> 		hand: evt hand) buildWorldMenu.
>
>
> Detailed description:     http://wiki.squeak.org/squeak/1047
>

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20180224/3af2cb6e/attachment.html>


More information about the Squeak-dev mailing list