<div dir="ltr"><div dir="ltr"><div class="gmail_default" style="font-size:large">Hi Tim,<br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Thu, Oct 29, 2020 at 11:11 AM <<a href="mailto:commits@source.squeak.org">commits@source.squeak.org</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-style:solid;border-left-color:rgb(204,204,204);padding-left:1ex">tim Rowledge uploaded a new version of Tools to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/Tools-tpr.1010.mcz" rel="noreferrer" target="_blank">http://source.squeak.org/trunk/Tools-tpr.1010.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Tools-tpr.1010<br>
Author: tpr<br>
Time: 29 October 2020, 11:10:57.263788 am<br>
UUID: 1ef23108-8885-419e-ad82-66b42e985086<br>
Ancestors: Tools-eem.1009<br>
<br>
Fix a bug introduced in Tools-tpr.1008 that made window labels go away in a few cases.<br></blockquote><div><br></div><div class="gmail_default" style="font-size:large">Your changes seem to also have broken Recent Changes (don't worry I also broke this at Qwaq before I was aware of it; but now I absolutely depend on it).  Go to the changes submenu of the World menu, select "Browse Recent Submissions (R)", and you get a RecentMessageSet with the most recently defined N methods in it.  When working properly every new method definition causes the RecentMessageSet to reformulate its list with the new method first most.  This is most useful :-)  However, after these recent changes it no longer works properly. The new method turns up but somewhere further down the lsut, obscuring it hopelessly.  Please fix asap.</div><div class="gmail_default" style="font-size:large"><br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-style:solid;border-left-color:rgb(204,204,204);padding-left:1ex">
<br>
=============== Diff against Tools-eem.1009 ===============<br>
<br>
Item was changed:<br>
  ----- Method: ChangedMessageSet class>>openMessageList:name:autoSelect:changeSet: (in category 'opening') -----<br>
  openMessageList: messageList name: labelString autoSelect: autoSelectString changeSet: aChangeSet<br>
        | messageSet |<br>
        messageSet := self messageList: messageList.<br>
        messageSet changeSet: aChangeSet.<br>
+       messageSet autoSelectString: autoSelectString;<br>
+               setInitialLabel: labelString.<br>
+       ToolBuilder open: messageSet!<br>
-       messageSet autoSelectString: autoSelectString.<br>
-       ToolBuilder open: messageSet label: labelString.!<br>
<br>
Item was changed:<br>
  ----- Method: MessageNames class>>openMessageNames (in category 'instance creation') -----<br>
  openMessageNames<br>
        "Open a new instance of the receiver in the active world"<br>
+       ^(ToolBuilder open: self new) model<br>
-       ^(ToolBuilder open: self new label: 'Message Names') model<br>
<br>
        "MessageNames openMessageNames"<br>
  !<br>
<br>
Item was added:<br>
+ ----- Method: MessageNames>>windowTitle (in category 'toolbuilder') -----<br>
+ windowTitle<br>
+  <br>
+       ^ 'Message Names'!<br>
<br>
Item was changed:<br>
  ----- Method: MessageSet class>>openMessageList:name: (in category 'instance creation') -----<br>
+ openMessageList: messageList name: labelString <br>
- openMessageList: anArray name: aString <br>
        "Create a standard system view for the message set on the list, anArray. <br>
        The label of the view is aString."<br>
<br>
+       self openMessageList: messageList name: labelString autoSelect: nil!<br>
-       self open: (self messageList: anArray) name: aString!<br>
<br>
Item was changed:<br>
  ----- Method: MessageSet>>windowTitle (in category 'user interface') -----<br>
  windowTitle<br>
        "just return the basic label for now"<br>
<br>
+       ^String streamContents:<br>
+               [:str| str nextPutAll: windowLabel;<br>
+                                       space;<br>
+                                       nextPut: $[;<br>
+                                       nextPutAll: messageList size asString;<br>
+                                       nextPut: $]<br>
+               ]!<br>
-       ^windowLabel!<br>
<br>
<br>
</blockquote></div><br clear="all"><div><br></div>-- <br><div dir="ltr" class="gmail_signature"><div dir="ltr"><div><span style="font-size:small;border-collapse:separate"><div>_,,,^..^,,,_<br></div><div>best, Eliot</div></span></div></div></div></div>