<body><div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000">
Hmm... there aren't many "+" in message categories. What about "&" or "and"?<div><br></div><div>Best,</div><div>Marcel</div><div class="mb_sig"></div><blockquote class="history_container" type="cite" style="border-left-style:solid;border-width:1px; margin-top:20px; margin-left:0px;padding-left:10px;">
<p style="color: #AAAAAA; margin-top: 10px;">Am 03.10.2019 01:01:16 schrieb commits@source.squeak.org <commits@source.squeak.org>:</p><div style="font-family:Arial,Helvetica,sans-serif">A new version of System was added to project The Inbox:<br>http://source.squeak.org/inbox/System-ct.1112.mcz<br><br>==================== Summary ====================<br><br>Name: System-ct.1112<br>Author: ct<br>Time: 3 October 2019, 1:00:59.749083 am<br>UUID: 46296c5c-1bbf-8849-96ad-70af15677f55<br>Ancestors: System-pre.1111<br><br>Recategorizes Smalltalk startup + shutdown list methods<br><br>=============== Diff against System-pre.1111 ===============<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>add:toList:after: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>add:toList:after: (in category 'startup list') -----<br> add: aClass toList: startUpOrShutDownList after: predecessor<br> "Add the name of aClass to the startUp or shutDown list.<br> Add it after the name of predecessor"<br> <br> (Smalltalk globals includes: aClass) <br> ifFalse: [self error: aClass name , ' cannot be found in Smalltalk dictionary.'].<br> <br> "Add after predecessor, moving it if already there."<br> (Smalltalk globals includes: predecessor) <br> ifFalse: [self error: predecessor name , ' cannot be found in Smalltalk dictionary.'].<br> (startUpOrShutDownList includes: predecessor name) <br> ifFalse: [self error: predecessor name , ' cannot be found in the list.'].<br> startUpOrShutDownList remove: aClass name ifAbsent:[].<br> startUpOrShutDownList add: aClass name after: predecessor name!<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>add:toList:before: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>add:toList:before: (in category 'startup list') -----<br> add: aClass toList: startUpOrShutDownList before: successor<br> "Add the name of aClass to the startUp or shutDown list.<br> Add it before the name of successor"<br> <br> (Smalltalk globals includes: aClass) <br> ifFalse: [self error: aClass name , ' cannot be found in Smalltalk dictionary.'].<br> <br> "Add before successor, moving it if already there."<br> (Smalltalk globals includes: successor) <br> ifFalse: [self error: successor name , ' cannot be found in Smalltalk dictionary.'].<br> (startUpOrShutDownList includes: successor name) <br> ifFalse: [self error: successor name , ' cannot be found in the list.'].<br> startUpOrShutDownList remove: aClass name ifAbsent: [].<br> startUpOrShutDownList add: aClass name before: successor name.!<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>addToShutDownList: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>addToShutDownList: (in category 'startup list') -----<br> addToShutDownList: aClass<br> "This will add a ref to this class at the BEGINNING of the shutDown list."<br> "No-op if already in the list."<br> <br> (ShutDownList includes: aClass name) ifFalse: [ShutDownList addFirst: aClass name]!<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>addToShutDownList:before: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>addToShutDownList:before: (in category 'startup list') -----<br> addToShutDownList: aClass before: predecessor<br> <br> self add: aClass toList: ShutDownList before: predecessor!<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>addToStartUpList: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>addToStartUpList: (in category 'startup list') -----<br> addToStartUpList: aClass<br> "This will add a ref to this class at the END of the startUp list."<br> "No-op if already in the list."<br> <br> (StartUpList includes: aClass name) ifFalse: [StartUpList addLast: aClass name]!<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>addToStartUpList:before: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>addToStartUpList:before: (in category 'startup list') -----<br> addToStartUpList: aClass before: predecessor<br> <br> self add: aClass toList: StartUpList before: predecessor!<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>removeFromShutDownList: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>removeFromShutDownList: (in category 'snapshot and quit') -----<br> removeFromShutDownList: aClass<br> <br> ShutDownList remove: aClass name ifAbsent: []!<br><br>Item was changed:<br>+ ----- Method: SmalltalkImage>>removeFromStartUpList: (in category 'startup + shutdown list') -----<br>- ----- Method: SmalltalkImage>>removeFromStartUpList: (in category 'snapshot and quit') -----<br> removeFromStartUpList: aClass<br> <br> StartUpList remove: aClass name ifAbsent: []!<br><br><br></div></blockquote>
</div></body>