The Inbox: System-tpr.1181.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Inbox: System-tpr.1181.mcz

commits-2
A new version of System was added to project The Inbox:
http://source.squeak.org/inbox/System-tpr.1181.mcz

==================== Summary ====================

Name: System-tpr.1181
Author: tpr
Time: 18 October 2020, 5:23:52.020099 pm
UUID: 259789c8-138c-421f-81e0-ac59cc248b07
Ancestors: System-mt.1180

Remove the no-longer needed (mis)calculation of the window label. Accompanies Tools-tpr.1004

=============== Diff against System-mt.1180 ===============

Item was changed:
  ----- Method: SystemNavigation>>browseMessageList:name:autoSelect: (in category 'browse') -----
  browseMessageList: messageListOrBlock name: labelString autoSelect: autoSelectString
  "Create and schedule a MessageSet browser on the message list. If messageListOrBlock is a block, then evaluate it to get the message list."
 
+ | messageList |
- | messageList title |
  messageList := messageListOrBlock isBlock
  ifTrue: [ Cursor wait showWhile: messageListOrBlock ]
  ifFalse: [ messageListOrBlock ].
  messageList size = 0 ifTrue: [
  ^self inform: 'There are no', String cr, labelString ].
- title := messageList size > 1
- ifFalse: [ labelString ]
- ifTrue: [ labelString, ' [', messageList size printString, ']' ].
  ^ ToolSet
  browseMessageSet: messageList
+ name: labelString
- name: title
  autoSelect: autoSelectString!