This is a small point, but maybe one tiny incremental improvement.
Just thought I'd get some feedback before opening a ticket. While
debug tracing through...
    Smalltalk tools openClassBrowser

in Nautilus>>open I see...
        (self uiClass on: self)

which calls PackageTreeNautilusUI class(AbstractNautilusUI class)>>on:
        ^ self new model: aNautilus

where PackageTreeNautilusUI(AbstractNautilusUI)>>model:
         model := aNautilusModel.
         ...

and my passing thought was a nicer API would be
    PackageTreeNautilusUI class(AbstractNautilusUI class)>>onModel:

such that Nautilus>>open would be...
        (self uiClass onModel: self)


Thoughts?
cheers -ben

Reply via email to