<body><div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000">
                                        Here is an example:<div><br></div><div><img id="f6129d7d-d796-4760-a314-3bfe783e5a1b" src="cid:063b6ffd-2be3-45d9-9f18-dcefd3f21412" width="auto"></img><br></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;">
                        <p style="color: #AAAAAA; margin-top: 10px;">Am 05.06.2020 11:50:15 schrieb commits@source.squeak.org <commits@source.squeak.org>:</p><div style="font-family:Arial,Helvetica,sans-serif">A new version of Morphic was added to project The Inbox:<br>http://source.squeak.org/inbox/Morphic-mt.1664.mcz<br><br>==================== Summary ====================<br><br>Name: Morphic-mt.1664<br>Author: mt<br>Time: 5 June 2020, 11:49:58.884634 am<br>UUID: 8a563509-bb80-b34a-a723-9bcc1a586f10<br>Ancestors: Morphic-mt.1663<br><br>Proposal of different format to print integers in the object explorer. Print them in groups of, e.g., 4 digits, separated by a space character.<br><br>I am sure that the actual implementation can be improved. :-)<br><br>=============== Diff against Morphic-mt.1663 ===============<br><br>Item was changed:<br>  ----- Method: Integer>>explorerContents (in category '*Morphic-Explorer') -----<br>  explorerContents<br>  <br>         ^#(<br>+          ('hexadecimal' 16 4)<br>+                 ('octal' 8 4)<br>+                ('binary' 2 4)) collect: [ :each | | label group |<br>+                   group := each third.<br>+                         label := self printStringBase: each second.<br>+                  label := label padded: #left to: (label size roundUpTo: group) with: $0.<br>+                             label := String streamContents: [:s |<br>+                                1 to: label size by: group do: [:index |<br>+                                     1 to: group do: [:gIndex |<br>+                                           s nextPut: (label at: index + gIndex - 1)].<br>+                                  s space]].<br>+                    <br>-            ('hexadecimal' 16)<br>-           ('octal' 8)<br>-          ('binary' 2)) collect: [ :each |<br>                      ObjectExplorerWrapper<br>+                                with: label<br>-                          with: (self printStringBase: each second)<br>                             name: each first translated<br>                           model: self ]!<br><br><br></div></blockquote>
                                        </div></body>