Yep. I notice about in this thread
http://lists.gforge.inria.fr/pipermail/pharo-project/2009-September/013307.html

On Mon, Sep 14, 2009 at 21:30, Stéphane Ducasse
<[email protected]> wrote:
> VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest
> update: #6747] Squeak VM 4.2.1b1
> Image: Pharo1.0beta [Latest update: #10440]
>
> SecurityManager state:
> Restricted: false
> FileAccess: true
> SocketAccess: true
> Working Dir /Users/ducasse/Workspace/FirstCircle/ActiveResearch/Pharo/
> Pharo/pharo1.0-10440-BETAdev09.09.1
> Trusted Dir /foobar/tooBar/forSqueak/bogus
> Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My
> Squeak
>
> DisplayText(Object)>>doesNotUnderstand: #form:
>        Receiver: a DisplayText
>        Arguments and temporary variables:
>                aMessage:       form: Form(210x20x32)
>                exception:      MessageNotUnderstood: DisplayText>>form:
>                resumeValue:    nil
>        Receiver's instance variables:
>                text:   a Text for 'a StringMorph(133)''Preferences'''
>                textStyle:      a TextStyle DejaVu Sans
>                offset:         0...@0
>                form:   nil
>                foreColor:      Color black
>                backColor:      Color white
>
> PSUIManager(MorphicUIManager)>>composeFormFor:
>        Receiver: a PSUIManager
>        Arguments and temporary variables:
>                aDisplayText:   a DisplayText
>                canvas:         a FormCanvas on: Form(210x20x32)
>                tmpText:        a TextMorph(1819)
>        Receiver's instance variables:
>                interactiveParser:      nil
>
> DisplayText>>composeForm
>        Receiver: a DisplayText
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                text:   a Text for 'a StringMorph(133)''Preferences'''
>                textStyle:      a TextStyle DejaVu Sans
>                offset:         0...@0
>                form:   nil
>                foreColor:      Color black
>                backColor:      Color white
>
> DisplayText>>form
>        Receiver: a DisplayText
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                text:   a Text for 'a StringMorph(133)''Preferences'''
>                textStyle:      a TextStyle DejaVu Sans
>                offset:         0...@0
>                form:   nil
>                foreColor:      Color black
>                backColor:      Color white
>
> DisplayText>>displayOn:at:clippingBox:rule:fillColor:
>        Receiver: a DisplayText
>        Arguments and temporary variables:
>                aDisplayMedium:         DisplayScreen(1424x848x32)
>                aDisplayPoint: �...@100
>                clipRectangle: �...@0 corner: 1...@848
>                ruleInteger:    3
>                aForm:  nil
>                form1:  nil
>                rule:   nil
>        Receiver's instance variables:
>                text:   a Text for 'a StringMorph(133)''Preferences'''
>                textStyle:      a TextStyle DejaVu Sans
>                offset:         0...@0
>                form:   nil
>                foreColor:      Color black
>                backColor:      Color white
>
> DisplayText(DisplayObject)>>displayOn:at:
>        Receiver: a DisplayText
>        Arguments and temporary variables:
>                aDisplayMedium:         DisplayScreen(1424x848x32)
>                aDisplayPoint: �...@100
>        Receiver's instance variables:
>                text:   a Text for 'a StringMorph(133)''Preferences'''
>                textStyle:      a TextStyle DejaVu Sans
>                offset:         0...@0
>                form:   nil
>                foreColor:      Color black
>                backColor:      Color white
>
> ByteString(String)>>displayOn:at:textColor:
>        Receiver: 'a StringMorph(133)''Preferences'''
>        Arguments and temporary variables:
>                aDisplayMedium:         DisplayScreen(1424x848x32)
>                aPoint:         0...@100
>                aColor:         Color black
>        Receiver's instance variables:
> 'a StringMorph(133)''Preferences'''
>
> ByteString(String)>>displayOn:at:
>        Receiver: 'a StringMorph(133)''Preferences'''
>        Arguments and temporary variables:
>                aDisplayMedium:         DisplayScreen(1424x848x32)
>                aPoint:         0...@100
>        Receiver's instance variables:
> 'a StringMorph(133)''Preferences'''
>
> ByteString(String)>>displayAt:
>        Receiver: 'a StringMorph(133)''Preferences'''
>        Arguments and temporary variables:
>                aPoint:         0...@100
>        Receiver's instance variables:
> 'a StringMorph(133)''Preferences'''
>
> StringMorph(Object)>>printDirectlyToDisplay
>        Receiver: a StringMorph(133)'Preferences'
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 9...@18
>                owner:  an AlignmentMorph(548)
>                submorphs:      #()
>                fullBounds:     nil
>                color:  Color black
>                extension:      nil
>                font:   a LogicalFont
>  familyName: DejaVu Serif
>  emphasis: nil
>  pointSize: 11
>  re...etc...
>                emphasis:       0
>                contents:       'Preferences'
>                hasFocus:       false
>
> Object class>>DoIt
>        Receiver: Object
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                superclass:     ProtoObject
>                methodDict:     a MethodDictionary(size 378)
>                format:         2
>                instanceVariables:      nil
>                organization:   ('*Polymorph-EventEnhancements'
> when:send:to:exclusive: when:send...etc...
>                subclasses:     {BalloonState . StandardFileMenuResult .
> UndefinedObject . Boolean ...etc...
>                name:   #Object
>                classPool:      a Dictionary(#DependentsFields->a
> WeakIdentityKeyDictionary(size 154...etc...
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #'Kernel-Objects'
>                traitComposition:       nil
>                localSelectors:         nil
>
> Compiler>>evaluate:in:to:notifying:ifFail:logged:
>        Receiver: a Compiler
>        Arguments and temporary variables:
> <<error during printing>
>        Receiver's instance variables:
>                sourceStream:   a ReadWriteStream 'printDirectlyToDisplay
>        "For debugging: write ...etc...
>                requestor:      an OBTextMorphEditorWithShout
>                class:  Object class
>                category:       nil
>                context:        nil
>                parser:         a Parser
>
> [] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
> <<error during printing>
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> BlockClosure>>on:do:
>        Receiver: [closure] in
> OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection
>        Arguments and temporary variables:
>                exception:      OutOfScopeNotification
>                handlerAction:  [closure] in
> OBTextMorphEditorWithShout(ParagraphEditor)>>evalua...etc...
>                handlerActive:  true
>        Receiver's instance variables:
>                outerContext:
> OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection
>                startpc:        116
>                numArgs:        0
>
> OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>                result:         nil
>                rcvr:   Object
>                ctxt:   nil
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> OBTextMorphEditorWithShout(ParagraphEditor)>>doIt
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> [] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
> <<error during printing>
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> OBTextMorphEditorWithShout
> (ParagraphEditor)>>terminateAndInitializeAround:
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>                aBlock:         [closure] in
> OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>                characterStream:        a WriteStream ''
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with:
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>                keyEvent:       [keystroke '<Cmd-d>']
>                typeAheadStream:        a WriteStream ''
>                honorCommandKeys:       true
>                keyValue:       100
>                keyChar:        $d
>                char:   $d
>                action:         #doIt:
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with:
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>                keyEvent:       [keystroke '<Cmd-d>']
>                typeAheadStream:        a WriteStream ''
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke:
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>                keyEvent:       [keystroke '<Cmd-d>']
>                typeAhead:      a WriteStream ''
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke:
>        Receiver: an OBTextMorphEditorWithShout
>        Arguments and temporary variables:
>                keyEvent:       [keystroke '<Cmd-d>']
>        Receiver's instance variables:
>                model:  an OBDefinitionPanel
>                paragraph:      a MultiNewParagraph
>                startBlock:     a CharacterBlock with index 257 and character 
> $" and
> rectangle 346....etc...
>                stopBlock:      a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.224...etc...
>                beginTypeInBlock:       nil
>                emphasisHere:   an Array(a TextColor code: (Color r: 0.0 g: 
> 0.5 b:
> 0.0) a TextEmp...etc...
>                initialText:    a Text for 'printDirectlyToDisplay
>        "For debugging: write the rece...etc...
>                selectionShowing:       false
>                otherInterval:  (208 to: 207)
>                lastParentLocation:     nil
>                morph:  an OBTextMorphWithShout(3688)
>                oldInterval:    (210 to: 209)
>                pivotBlock:     a CharacterBlock with index 210 and character 
> $S and
> rectangle 7.22...etc...
>                inBackTo:       nil
>
> [] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
> <<error during printing>
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> OBTextMorphWithShout(TextMorph)>>handleInteraction:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                interactionBlock:       [closure] in [] in
> OBTextMorphWithShout(TextMorph)>>keyStroke...etc...
>                oldEditor:      an OBTextMorphEditorWithShout
>                oldParagraph:   a MultiNewParagraph
>                oldText:        a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver...etc...
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                interActionBlock:       [closure] in [] in
> OBTextMorphWithShout(TextMorph)>>keyStroke...etc...
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> [] in OBTextMorphWithShout(TextMorph)>>keyStroke:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                evt:    [keystroke '<Cmd-d>']
>                action:         nil
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> ECToolSet class>>codeCompletionAround:textMorph:keyStroke:
>        Receiver: ECToolSet
>        Arguments and temporary variables:
>                aBlock:         [closure] in 
> OBTextMorphWithShout(TextMorph)>>keyStroke:
>                aTextMorph:     an OBTextMorphWithShout(3688)
>                evt:    [keystroke '<Cmd-d>']
>                completionAllowed:      true
>                editor:         an OBTextMorphEditorWithShout
>                stringHolder:   an OBDefinitionPanel
>        Receiver's instance variables:
>                superclass:     StandardToolSet
>                methodDict:     a MethodDictionary()
>                format:         2
>                instanceVariables:      nil
>                organization:   ('as yet unclassified')
>
>                subclasses:     nil
>                name:   #ECToolSet
>                classPool:      nil
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #'Ocompletion-ECSqueak'
>                traitComposition:       nil
>                localSelectors:         nil
>
> DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:
>        Receiver: DEVToolSet
>        Arguments and temporary variables:
>                aBlock:         [closure] in 
> OBTextMorphWithShout(TextMorph)>>keyStroke:
>                aTextMorph:     an OBTextMorphWithShout(3688)
>                evt:    [keystroke '<Cmd-d>']
>                toolSet:        ECToolSet
>        Receiver's instance variables:
>                superclass:     StandardToolSet
>                methodDict:     a MethodDictionary()
>                format:         2
>                instanceVariables:      nil
>                organization:   ('as yet unclassified')
>
>                subclasses:     nil
>                name:   #DEVToolSet
>                classPool:      nil
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #ImageForDevelopers
>                traitComposition:       nil
>                localSelectors:         nil
>
> ToolSet class>>codeCompletionAround:textMorph:keyStroke:
>        Receiver: ToolSet
>        Arguments and temporary variables:
>                aBlock:         [closure] in 
> OBTextMorphWithShout(TextMorph)>>keyStroke:
>                aTextMorph:     an OBTextMorphWithShout(3688)
>                evt:    [keystroke '<Cmd-d>']
>        Receiver's instance variables:
>                superclass:     AppRegistry
>                methodDict:     a MethodDictionary()
>                format:         2
>                instanceVariables:      nil
>                organization:   ('as yet unclassified')
>
>                subclasses:     nil
>                name:   #ToolSet
>                classPool:      nil
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #'System-Applications'
>                traitComposition:       nil
>                localSelectors:         nil
>                registeredClasses:      an OrderedCollection(StandardToolSet
> NewInspectorToolSet DEV...etc...
>                default:        DEVToolSet
>
> OBTextMorphWithShout(TextMorph)>>keyStroke:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                evt:    [keystroke '<Cmd-d>']
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> OBTextMorphWithShout(TextMorphForEditView)>>keyStroke:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                evt:    [keystroke '<Cmd-d>']
>                view:   an OBPluggableTextMorphWithShout(441)
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> OBTextMorphWithShout(TextMorph)>>handleKeystroke:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                anEvent:        [keystroke '<Cmd-d>']
>                pasteUp:        nil
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> KeyboardEvent>>sentTo:
>        Receiver: [keystroke '<Cmd-d>']
>        Arguments and temporary variables:
>                anObject:       an OBTextMorphWithShout(3688)
>        Receiver's instance variables:
>                timeStamp:      1998226
>                source:         a HandMorph(3216)
>                windowIndex:    nil
>                type:   #keystroke
>                buttons:        64
>                position:       3...@104
>                handler:        nil
>                wasHandled:     true
>                keyValue:       100
>                charCode:       100
>                scanCode:       2
>
> OBTextMorphWithShout(Morph)>>handleEvent:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                anEvent:        [keystroke '<Cmd-d>']
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> OBTextMorphWithShout(Morph)>>handleFocusEvent:
>        Receiver: an OBTextMorphWithShout(3688)
>        Arguments and temporary variables:
>                anEvent:        [keystroke '<Cmd-d>']
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 7...@114
>                owner:  a TransformMorph(832)
>                submorphs:      #()
>                fullBounds:     0...@0 corner: 7...@114
>                color:  Color black
>                extension:      a MorphExtension (835) [other:  (blinkStart -> 
> 2050726)]
>                borderWidth:    0
>                borderColor:    Color black
>                textStyle:      a TextStyle DejaVu Sans Mono
>                text:   a Text for 'printDirectlyToDisplay
>        "For debugging: write the receiver''s...etc...
>                wrapFlag:       true
>                paragraph:      a MultiNewParagraph
>                editor:         an OBTextMorphEditorWithShout
>                container:      nil
>                predecessor:    nil
>                successor:      nil
>                backgroundColor:        nil
>                margins:        nil
>                editHistory:    nil
>                editView:       an OBPluggableTextMorphWithShout(441)
>                acceptOnCR:     false
>
> [] in HandMorph>>sendFocusEvent:to:clear:
>        Receiver: a HandMorph(3216)
>        Arguments and temporary variables:
> <<error during printing>
>        Receiver's instance variables:
>                bounds:         1...@524 corner: 1...@540
>                owner:  a PasteUpMorph(1622) [world]
>                submorphs:      #()
>                fullBounds:     1...@524 corner: 1...@540
>                color:  Color blue
>                extension:      a MorphExtension (539) [eventHandler = an 
> EventHandler]
>                mouseFocus:     nil
>                keyboardFocus:  nil
>                eventListeners:         nil
>                mouseListeners:         nil
>                keyboardListeners:      nil
>                mouseClickState:        nil
>                mouseOverHandler:       a MouseOverHandler
>                lastMouseEvent:         [1...@524 mouseUp 2090376 nil]
>                targetOffset:   3...@8
>                damageRecorder:         a DamageRecorder
>                cacheCanvas:    nil
>                cachedCanvasHasHoles:   true
>                temporaryCursor:        nil
>                temporaryCursorOffset:  nil
>                hardwareCursor:         nil
>                hasChanged:     true
>                savedPatch:     nil
>                userInitials:   ''
>                lastEventBuffer:        #(1 2090376 1138 524 0 0 0 1)
>                lastKeyScanCode:        2
>                combinedChar:   nil
>
> [] in PasteUpMorph>>becomeActiveDuring:
>        Receiver: a PasteUpMorph(1622) [world]
>        Arguments and temporary variables:
> <<error during printing>
>        Receiver's instance variables:
>                bounds:         0...@0 corner: 1...@848
>                owner:  nil
>                submorphs:      an Array(a TaskbarMorph(3095) a 
> SystemWindow(2431) a
> SystemWindow(40...etc...
>                fullBounds:     0...@0 corner: 1...@848
>                color:  (Color r: 0.97 g: 0.98 b: 1.0)
>                extension:      a MorphExtension (2543) [eventHandler = an
> EventHandler]  [other:  (...etc...
>                borderWidth:    0
>                borderColor:    (Color r: 0.03 g: 0.02 b: 0.0)
>                presenter:      a Presenter (1246)
>                model:  a MorphicModel(1926)
>                cursor:         1
>                padding:        3
>                backgroundMorph:        nil
>                isPartsBin:     nil
>                autoLineLayout:         false
>                indicateCursor:         nil
>                resizeToFit:    nil
>                wantsMouseOverHalos:    nil
>                worldState:     a WorldState
>                griddingOn:     nil
>
> BlockClosure>>on:do:
>        Receiver: [closure] in PasteUpMorph>>becomeActiveDuring:
>        Arguments and temporary variables:
>                exception:      Error
>                handlerAction:  [closure] in PasteUpMorph>>becomeActiveDuring:
>                handlerActive:  false
>        Receiver's instance variables:
>                outerContext:   PasteUpMorph>>becomeActiveDuring:
>                startpc:        67
>                numArgs:        0
>
>
> --- The full stack ---
> DisplayText(Object)>>doesNotUnderstand: #form:
> PSUIManager(MorphicUIManager)>>composeFormFor:
> DisplayText>>composeForm
> DisplayText>>form
> DisplayText>>displayOn:at:clippingBox:rule:fillColor:
> DisplayText(DisplayObject)>>displayOn:at:
> ByteString(String)>>displayOn:at:textColor:
> ByteString(String)>>displayOn:at:
> ByteString(String)>>displayAt:
> StringMorph(Object)>>printDirectlyToDisplay
> Object class>>DoIt
> Compiler>>evaluate:in:to:notifying:ifFail:logged:
> [] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection
> BlockClosure>>on:do:
> OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection
> OBTextMorphEditorWithShout(ParagraphEditor)>>doIt
> [] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:
> OBTextMorphEditorWithShout
> (ParagraphEditor)>>terminateAndInitializeAround:
> OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:
> OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with:
> OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with:
> OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke:
> OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke:
> [] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke:
> OBTextMorphWithShout(TextMorph)>>handleInteraction:
> OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction:
> [] in OBTextMorphWithShout(TextMorph)>>keyStroke:
> ECToolSet class>>codeCompletionAround:textMorph:keyStroke:
> DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:
> ToolSet class>>codeCompletionAround:textMorph:keyStroke:
> OBTextMorphWithShout(TextMorph)>>keyStroke:
> OBTextMorphWithShout(TextMorphForEditView)>>keyStroke:
> OBTextMorphWithShout(TextMorph)>>handleKeystroke:
> KeyboardEvent>>sentTo:
> OBTextMorphWithShout(Morph)>>handleEvent:
> OBTextMorphWithShout(Morph)>>handleFocusEvent:
> [] in HandMorph>>sendFocusEvent:to:clear:
> [] in PasteUpMorph>>becomeActiveDuring:
> BlockClosure>>on:do:
>
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>

_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to