Well, there is still an issue to solve, namely that the about box has
now the right text (I added
>>aboutText
^self class comment
But then, the title of the about Window is wrong, as it says: "About
WindowModel"
(of course...)
Saw that Nautilus inherits from SystemWindow, so that's why it is
having the right title...
WindowModel>>title says:
title
^ self model
ifNil: [ super title ]
ifNotNil: [:m | m title ]
Well, some more digging needed...
Phil
2013/2/18 Sean P. DeNigris <[email protected]>:
> philippeback wrote
>> Ideas?
>
> I created a hook. You can load the slice for Issue 7529: [ENH]: Spec "About"
> window text. Then override #aboutText in your ComposableModel subclass
>
> Or, for now, this hack works, but I don't know if there are other
> consequences...
> MyCoolUI class>>open
>
> | instance windowModel |
> instance := self new.
> windowModel := instance openWithSpec.
> windowModel
> extent: 500@300.
> windowModel window model: instance.
> ^ windowModel.
>
> And then you would write the about text in MyCoolUI class comment...
>
> HTH,
> Sean
>
>
>
> --
> View this message in context:
> http://forum.world.st/Spec-question-how-to-set-the-About-contents-for-the-window-opened-with-openWithSpec-tp4670435p4670459.html
> Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.
>
>
