Hi Marcel,

I'm doing some testing in trunk and just noticed this.  When selecting a
message in the code pane and browsing senders, **it must always spawn a new
MessageTrace** instead of mangling the to the list at the top.

The trace at the top is supposed to represent execution flow between the
messages in the list, and NOT different random messages that derail the
trace and make it a complete mess.

I also noticed this has been backported to 5.3.

 - Chris


On Mon, Apr 27, 2020 at 2:32 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.1652.mcz
>
> ==================== Summary ====================
>
> Name: Morphic-mt.1652
> Author: mt
> Time: 27 April 2020, 9:31:57.493264 am
> UUID: d23bbde5-4e42-3547-960d-39994fc21f56
> Ancestors: Morphic-ct.1651
>
> Fixes regression #browseIt in TraceMessages, too. Now all recent hick-ups
> with TraceMessages are gone. There are still some hooks missing such as
> #browseAllAccessTo:from:.
>
> However, I think we should push down those backstops from Object to Model.
>
> Note that I already backported this fix to Squeak 5.3.
>
> =============== Diff against Morphic-ct.1651 ===============
>
> 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].
> -               [:binding | self systemNavigation 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].
> -               [:selector | ^ self systemNavigation
> browseAllImplementorsOf: selector].
>
>         morph flash!
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220109/835f8dca/attachment.html>