[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
|