<div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000;text-align: left" dir="ltr">
                                        Hi Dave --<div><br></div><div>Nice idea. Well, #privateAuthorsRaw was meant to be a small database. Like those base64 encoded icon contents. If you really want to see nicer diffs for this method, go ahead at update it. :-) Then we can also see whether we remove something by accident.</div><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;min-width: 500px">
                        <p style="color: #AAAAAA; margin-top: 10px;">Am 09.02.2022 02:54:29 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-dtl.1304.mcz<br><br>==================== Summary ====================<br><br>Name: System-dtl.1304<br>Author: dtl<br>Time: 8 February 2022, 8:54:15.36808 pm<br>UUID: 425a12bd-d324-4d48-91db-a29dfb4bb67b<br>Ancestors: System-mt.1303<br><br>Use Character cr as a separator in privateAuthorsRaw so that each author appears on a separate line in the method. Future updates will be readable in the version diffs.<br><br>=============== Diff against System-mt.1303 ===============<br><br>Item was changed:<br>  ----- Method: SystemNavigation class>>initializeAuthors (in category 'class initialization') -----<br>  initializeAuthors<br>         "self initializeAuthors"<br>    <br>      | s currentName currentAbbrv |<br>        Authors := Dictionary new.<br>    s := self privateAuthorsRaw readStream.<br>       <br>      [s atEnd] whileFalse: [<br>               "Read author name"<br>                  currentName := String streamContents: [:as |<br>                          [s peek ~= $#] whileTrue: [as nextPut: s next]].<br>              Authors at: currentName put: Set new.<br>                 "Read abbreviations"<br>                s next. "skip $#"<br>           currentAbbrv := ''.<br>+          [s atEnd not and: [s peek ~= Character cr]] whileTrue: [<br>-             [s atEnd not and: [s peek ~= $!!]] whileTrue: [<br>                       s peek = $# ifTrue: [<br>                                 (Authors at: currentName) add: currentAbbrv.<br>                                  currentAbbrv := ''.<br>                           s next. "skip $#"].<br>                         currentAbbrv := currentAbbrv, s next asString. "slow..."<br>                    ].<br>            currentAbbrv ifNotEmpty: [(Authors at: currentName) add: currentAbbrv].<br>               s next. "skip $!!"<br>          ].<br>  <br>        "Fill inverted index for authors."<br>          AuthorsInverted := Dictionary new.<br>    Authors keysAndValuesDo: [:fullName :abbreviations |<br>                  abbreviations do: [:abbrv |<br>                   (AuthorsInverted<br>                              at: abbrv<br>                             ifAbsentPut: [Set new]) add: fullName]].!<br><br>Item was changed:<br>  ----- Method: SystemNavigation class>>privateAuthorsRaw (in category 'class initialization') -----<br>(excessive size, no diff calculated)<br><br><br></div></blockquote></div>