<body><div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000;text-align: left" dir="ltr">
+1 :-)<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 15.05.2021 19:31:00 schrieb commits@source.squeak.org <commits@source.squeak.org>:</p><div style='font-family:Arial,Helvetica,sans-serif'>David T. Lewis uploaded a new version of System to project The Trunk:<br>http://source.squeak.org/trunk/System-dtl.1234.mcz<br><br>==================== Summary ====================<br><br>Name: System-dtl.1234<br>Author: dtl<br>Time: 15 May 2021, 1:30:44.531511 pm<br>UUID: 40e78b44-f874-4a29-af19-9d289d15d049<br>Ancestors: System-dtl.1233<br><br>PositionableStream>>fileInSilentlyAnnouncing: has not been used since at least Squeak 3.8, and was not present in Squeak 3.6. Remove it without deprecation.<br><br>=============== Diff against System-dtl.1233 ===============<br><br>Item was removed:<br>- ----- Method: PositionableStream>>fileInSilentlyAnnouncing: (in category '*System-Changes-fileIn/Out') -----<br>- fileInSilentlyAnnouncing: announcement <br>- "This is special for reading expressions from text that has been formatted <br>- with exclamation delimitors. The expressions are read and passed to the <br>- Compiler. Answer the result of compilation. Put up a progress report with<br>- the given announcement as the title."<br>- <br>- | val chunk |<br>- [self atEnd] whileFalse: <br>- [self skipSeparators.<br>- <br>- [val := (self peekFor: $!!) <br>- ifTrue: [(Compiler evaluate: self nextChunk logged: false) scanFrom: self]<br>- ifFalse: <br>- [chunk := self nextChunk.<br>- self checkForPreamble: chunk.<br>- Compiler evaluate: chunk logged: true]] <br>- on: InMidstOfFileinNotification<br>- do: [:ex | ex resume: true].<br>- self skipStyleChunk].<br>- self close.<br>- "Note: The main purpose of this banner is to flush the changes file."<br>- Smalltalk logChange: '----End fileIn of ' , self name , '----'.<br>- self flag: #ThisMethodShouldNotBeThere. "sd"<br>- SystemNavigation new allBehaviorsDo: <br>- [:cl | <br>- cl<br>- removeSelectorSimply: #DoIt;<br>- removeSelectorSimply: #DoItIn:].<br>- ^val!<br><br><br></div></blockquote>
</div></body>