Yep. I notice about in this thread http://lists.gforge.inria.fr/pipermail/pharo-project/2009-September/013307.h... On Mon, Sep 14, 2009 at 21:30, Stéphane Ducasse <stephane.ducasse@inria.fr> 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:  0@100         clipRectangle:  0@0 corner: 1424@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:  0@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: 93@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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:    346@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@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:     1138@524 corner: 1154@540         owner:  a PasteUpMorph(1622) [world]         submorphs:    #()         fullBounds:   1138@524 corner: 1154@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:     [1138@524 mouseUp 2090376 nil]         targetOffset:  35@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: 1424@848         owner:  nil         submorphs:    an Array(a TaskbarMorph(3095) a SystemWindow(2431) a SystemWindow(40...etc...         fullBounds:   0@0 corner: 1424@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 Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project