Okay, this is why I put mine in the Inbox instead of Trunk...   :)

I will test this.

Thank you.

On Tue, Jan 11, 2022 at 2:48 AM <commits at source.squeak.org> wrote:

> Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
> http://source.squeak.org/trunk/Morphic-mt.1844.mcz
>
> ==================== Summary ====================
>
> Name: Morphic-mt.1844
> Author: mt
> Time: 11 January 2022, 9:48:30.418724 am
> UUID: 721f3062-f45a-4f5e-8e74-b9871a0269ee
> Ancestors: Morphic-ct.1843
>
> Complements Tools-mt.1101.
>
> Note that an editor's requestor must be its view/morph because the editor
> is an implementation detail not to be exposed to the model. A view/morph,
> however, can have a #name and thus easily be queried -- even without
> exposing Morphic details and supporting MVC as well. ... this is Morphic
> only though. TextEditor not that specific to Morphic, though. We might want
> to improve that in the future. And text editing/rendering in general. It's
> really not about Morphic but more low-level.
>
> =============== Diff against Morphic-ct.1843 ===============
>
> Item was changed:
>   ----- Method: TextEditor>>browseIt (in category 'menu messages') -----
>   browseIt
>         "Launch a browser for the current selection, if appropriate."
>
>         Preferences alternativeBrowseIt ifTrue: [^ self browseClassFromIt].
>
>         self lineSelectAndEmptyCheck: [^ morph flash].
>
>         "First, try to show all accesses to instance or class variables."
>         self selectedInstanceVariable ifNotNil:
>                 [:nameToClass | self systemNavigation
>                         browseAllAccessesTo: nameToClass key
>                         from: nameToClass value].
>         self selectedClassVariable ifNotNil:
>                 [:binding | self model browseAllCallsOn: binding].
>
>         "Then, either browse the class (from a binding) or all
> implementors of a selector."
>         self selectedBinding ifNotNil:
>                 [:binding | ^ self systemNavigation browseClass: binding].
>         self selectedSelector ifNotNil:
> +               [:selector | ^ self model browseAllImplementorsOf:
> selector requestor: morph].
> -               [:selector | ^ self model browseAllImplementorsOf:
> selector].
>
>         morph flash!
>
> Item was changed:
>   ----- Method: TextEditor>>implementorsOfIt (in category 'menu messages')
> -----
>   implementorsOfIt
>         "Open an implementors browser on the selected selector"
>
>         self lineSelectAndEmptyCheck: [^ self].
>         self selectedSelector ifNotNil:
> +               [:aSelector| ^self model browseAllImplementorsOf:
> aSelector requestor: morph].
> -               [:aSelector| ^self model browseAllImplementorsOf:
> aSelector].
>         self selectedLiteral ifNotNil:
> +               [:aLiteral| ^self model browseAllImplementorsOf: aLiteral
> requestor: morph].
> -               [:aLiteral| ^self model browseAllImplementorsOf: aLiteral].
>         morph flash.!
>
> Item was changed:
>   ----- Method: TextEditor>>sendersOfIt (in category 'menu messages') -----
>   sendersOfIt
>         "Open a senders browser on the selected selector"
>
>         self lineSelectAndEmptyCheck: [^ self].
>         self selectedSelector ifNotNil: [:aSelector |
> +               ^ self model browseAllCallsOn: aSelector requestor: morph].
> -               ^ self model browseAllCallsOn: aSelector].
>         self selectedLiteral ifNotNil: [:aLiteral |
> +               ^ self model browseAllCallsOn: aLiteral requestor: morph].
> -               ^ self model browseAllCallsOn: aLiteral].
>         morph flash.!
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220111/db49aa58/attachment.html>