The Trunk: Morphic-tpr.692.mcz

> He he, I'm always amazed about code entropy...
> Sowing a new Class seed in a Squeak image takes a few minutes.
> And if you wait long enough for ramifications and roots to propagate inside
> the image substrate, then digging up the planting can costs weeks or months
> !
>
>
> 2013/9/27 <[hidden email]>
>
>> tim Rowledge uploaded a new version of Morphic to project The Trunk:
>> http://source.squeak.org/trunk/Morphic-tpr.692.mcz
>>
>> ==================== Summary ====================
>>
>> Name: Morphic-tpr.692
>> Author: tpr
>> Time: 27 September 2013, 1:08:00.67 pm
>> UUID: 5f7e3f38-596a-413e-9c4f-e8bf96dddbac
>> Ancestors: Morphic-nice.691
>>
>> Payoff time! We get to remove a couple of once irritating classes that are
>> no longer needed
>>
>> =============== Diff against Morphic-nice.691 ===============
>>
>> Item was removed:
>> - NewParagraph subclass: #MultiNewParagraph
>> -       instanceVariableNames: ''
>> -       classVariableNames: ''
>> -       poolDictionaries: 'TextConstants'
>> -       category: 'Morphic-Multilingual'!
>>
>> Item was removed:
>> - ----- Method: MultiNewParagraph class>>initialize (in category 'class
>> initialization') -----
>> - initialize
>> -       "Prepare our own funeral"
>> -
>> -       MultiNewParagraph allInstancesDo:[:mnp| mnp becomeForward: (mnp
>> as: NewParagraph)]!
>>
>> Item was removed:
>> - ----- Method: MultiNewParagraph>>displayOn:using:at: (in category
>> 'fonts-display') -----
>> - displayOn: aCanvas using: displayScanner at: somePosition
>> -       "Send all visible lines to the displayScanner for display"
>> -
>> -       | visibleRectangle offset leftInRun line |
>> -       visibleRectangle := aCanvas clipRect.
>> -       offset := somePosition - positionWhenComposed.
>> -       leftInRun := 0.
>> -       (self lineIndexForPoint: visibleRectangle topLeft)
>> -               to: (self lineIndexForPoint: visibleRectangle bottomRight)
>> -               do: [:i | line := lines at: i.
>> -                       self displaySelectionInLine: line on: aCanvas.
>> -                       line first <= line last ifTrue:
>> -                               [leftInRun := displayScanner displayLine:
>> line
>> -                                                               offset:
>> offset leftInRun: leftInRun]].
>> - !
>>
>> Item was removed:
>> - TextComposer subclass: #MultiTextComposer
>> -       instanceVariableNames: ''
>> -       classVariableNames: ''
>> -       poolDictionaries: 'TextConstants'
>> -       category: 'Morphic-Multilingual'!
>> -
>> - !MultiTextComposer commentStamp: 'tpr 9/25/2013 13:04' prior: 0!
>> - This is now a null calss we are working on removing completely!
>>
>>
>
>
>
>