- Pharo-dev - lists.pharo.org

Re: [Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki

by Geert Claes

Adrian Lienhard wrote: > > For convenience, we have set up the following domains: > http://issues.pharo-project.org > http://ci.pharo-project.org > http://book.pharo-project.org > http://wiki.pharo-project.org > That's funny, I was just about to post about having added the following sub-domain redirections: http://build.pharo.world.st http://code.world.st -- View this message in context: http://forum.world.st/ANN-Pharo-domains-for-CI-book-issues-and-wiki-tp32487… Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

Jan. 31, 2011

[Pharo-project] Hudson now Jenkins

by Geert Claes

Since we are using Hudson I was wondering if anyone has been following Hudson's issues with Oracle at all? This is how I understand it; the creator of Hudson (Kohsuke Kawaguchi) and founder of infradna.com (which has now joined forces with Cloudbees - offering Hudson support) has had some disagreements with Oracle mainly regarding the ownership of the "Hudson" name. The Hudson community has recently voted for the project to be renamed to Jenkins, so hudson-labs.org is now jenkins-ci.org ps. I actually started looking at Hudson because I was baffled at the fact that the success icon is "blue" rather than a more intuitive "green" and hey, there is a plugin for that: http://wiki.hudson-ci.org/display/HUDSON/Green+Balls -- View this message in context: http://forum.world.st/Hudson-now-Jenkins-tp3248782p3248782.html Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

Jan. 31, 2011

Re: [Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki

by Dmitri Zagidulin

CI is a fairly standard industry acronym, though... 2011/1/31 Janko MivÅ¡ek <janko.mivsek(a)eranova.si>: > Hi Adrian, > > Nice addresses, except ci, which reminds me more to chi (energy) than > integration server :) > > Why not simply integration.pharo-project.org? > > On 31. 01. 2011 14:47, Adrian Lienhard wrote: >> For convenience, we have set up the following domains: >> >> http://issues.pharo-project.org >> http://ci.pharo-project.org >> http://book.pharo-project.org >> http://wiki.pharo-project.org >> >> Cheers, >> Adrian >> >> >> __________________________ >> www.adrian-lienhard.ch >> twitter.com/adrianlienhard >> >> >> > > -- > Janko MivÅ¡ek > Svetovalec za informatiko > Eranova d.o.o. > Ljubljana, Slovenija > www.eranova.si > tel: Â 01 514 22 55 > faks: 01 514 22 56 > gsm: 031 674 565 > >

Jan. 31, 2011

Re: [Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki

by Janko MivÅ¡ek

Hi Adrian, Nice addresses, except ci, which reminds me more to chi (energy) than integration server :) Why not simply integration.pharo-project.org? On 31. 01. 2011 14:47, Adrian Lienhard wrote: > For convenience, we have set up the following domains: > > http://issues.pharo-project.org > http://ci.pharo-project.org > http://book.pharo-project.org > http://wiki.pharo-project.org > > Cheers, > Adrian > > > __________________________ > www.adrian-lienhard.ch > twitter.com/adrianlienhard > > > -- Janko MivÅ¡ek Svetovalec za informatiko Eranova d.o.o. Ljubljana, Slovenija www.eranova.si tel: 01 514 22 55 faks: 01 514 22 56 gsm: 031 674 565

Jan. 31, 2011

Re: [Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki

by Tudor Girba

Nice. Doru On 31 Jan 2011, at 14:48, laurent laffont wrote: > > On Mon, Jan 31, 2011 at 2:47 PM, Adrian Lienhard <adi(a)netstyle.ch> wrote: > For convenience, we have set up the following domains: > > http://issues.pharo-project.org > http://ci.pharo-project.org > http://book.pharo-project.org > http://wiki.pharo-project.org > > > Cool ! Thank you Adrian. > > Laurent. > > Cheers, > Adrian > > > __________________________ > www.adrian-lienhard.ch > twitter.com/adrianlienhard > > > -- www.tudorgirba.com "If you interrupt the barber while he is cutting your hair, you will end up with a messy haircut."

Jan. 31, 2011

Re: [Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki

by laurent laffont

On Mon, Jan 31, 2011 at 2:47 PM, Adrian Lienhard <adi(a)netstyle.ch> wrote: > For convenience, we have set up the following domains: > > http://issues.pharo-project.org > http://ci.pharo-project.org > http://book.pharo-project.org > http://wiki.pharo-project.org > > Cool ! Thank you Adrian. Laurent. > Cheers, > Adrian > > __________________________ > www.adrian-lienhard.ch > twitter.com/adrianlienhard > > >

Jan. 31, 2011

[Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki

by Adrian Lienhard

For convenience, we have set up the following domains: http://issues.pharo-project.org http://ci.pharo-project.org http://book.pharo-project.org http://wiki.pharo-project.org Cheers, Adrian __________________________ www.adrian-lienhard.ch twitter.com/adrianlienhard

Jan. 31, 2011

[Pharo-project] Text Selection problem in 1.2 dev

by StÃ©phane Ducasse

hi guys in 1.2 dev when I play with ProfStef go I get an error after a couple of screens normally 3. I do not understand why but it looks really a problem with text selection https://pharo-ic.lille.inria.fr/hudson/view/Pharo/job/Pharo%201.2/ Stef 31 January 2011 2:22 pm VM: Mac OS - intel - 1064 - Pharo1.1.1 of 12 September 2010 [Latest update: #11414] 21.0 Image: Pharo1.2rc2 [Latest update: #12327]31 January 2011 2:22 pm VM: Mac OS - intel - 1064 - Pharo1.1.1 of 12 September 2010 [Latest update: #11414] 21.0 Image: Pharo1.2rc2 [Latest update: #12327] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Data/Downloads/Pharo-1.2 Trusted Dir /foobar/tooBar/forSqueak/bogus/ Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak/ ByteString class(Object)>>error: Receiver: ByteString Arguments and temporary variables: aString: 'basicNew: failed' Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(Object)>>primitiveFailed: Receiver: ByteString Arguments and temporary variables: selector: #basicNew: Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(Object)>>primitiveFailed Receiver: ByteString Arguments and temporary variables: Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(Behavior)>>basicNew: Receiver: ByteString Arguments and temporary variables: sizeRequested: -1 Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(String class)>>new: Receiver: ByteString Arguments and temporary variables: sizeRequested: -1 Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString(SequenceableCollection)>>copyFrom:to: Receiver: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc... Arguments and temporary variables: start: 550 stop: 548 newSize: -1 Receiver's instance variables: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc... Text>>copyFrom:to: Receiver: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which ...etc... Arguments and temporary variables: start: 550 stop: 563 realStart: 550 realStop: 548 Receiver's instance variables: string: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do I...etc... runs: a RunArray runs: #(212 2 1 1 1 1 1 1 2 166 2 4 1 5 1 2 4 1 3 1 2 79 2 14 ...etc... SmalltalkEditor(TextEditor)>>selection Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: textOrStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc... aContext: nil receiver: nil aRequestor: a SmalltalkEditor failBlock: [FakeClassPool adopt: nil. ^ #failedDoit] logFlag: true methodNode: DoIt ^ ProfStef next method: (UndefinedObject>>#DoIt "a CompiledMethod(656408576)") value: a LessonView toLog: nil itsSelection: nil itsSelectionString: nil Receiver's instance variables: sourceStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc... requestor: a SmalltalkEditor class: UndefinedObject category: nil context: nil parser: a Parser [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self ifFail: [FakeClassPool adopt: nil. ^ #failedDoit] logged: true] in SmalltalkEditor>>evaluateSelection Receiver: a SmalltalkEditor Arguments and temporary variables: rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState BlockClosure>>on:do: Receiver: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: ...etc... Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [:ex | ex resume: true] handlerActive: true Receiver's instance variables: outerContext: SmalltalkEditor>>evaluateSelection startpc: 116 numArgs: 0 SmalltalkEditor>>evaluateSelection Receiver: a SmalltalkEditor Arguments and temporary variables: result: nil rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor>>doIt Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor>>doIt: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>dispatchOn: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] asciiValue: 100 honorCommandKeys: true char: nil Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>processKeyStroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>keystroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView(TextMorph)>>handleInteraction: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: interactionBlock: [editor keystroke: evt] oldEditor: a SmalltalkEditor oldParagraph: a MultiNewParagraph oldText: a Text for '"Cool ! (I like to say Cooool :) ). You''ve just executed ...etc... Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView>>handleInteraction: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: interActionBlock: [editor keystroke: evt] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] action: nil Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false ECToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ECToolSet Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(786432) evt: [keystroke '<Cmd-d>'] completionAllowed: false editor: a SmalltalkEditor stringHolder: a LessonView 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: a SystemDictionary(lots of globals) category: #'Ocompletion-ECSqueak' traitComposition: {} localSelectors: nil DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: DEVToolSet Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(786432) 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: a SystemDictionary(lots of globals) category: #ImageForDevelopers traitComposition: {} localSelectors: nil ToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ToolSet Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(786432) 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: a SystemDictionary(lots of globals) category: #'System-Applications' traitComposition: nil localSelectors: nil registeredClasses: an OrderedCollection(StandardToolSet ECToolSet DEVToolSet) default: DEVToolSet TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] view: a PluggableShoutMorph(1061158912) Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView(TextMorph)>>handleKeystroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] pasteUp: nil Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false KeyboardEvent>>sentTo: Receiver: [keystroke '<Cmd-d>'] Arguments and temporary variables: anObject: a TextMorphForEditView(786432) Receiver's instance variables: timeStamp: 12927 source: a HandMorph(843055104) windowIndex: nil type: #keystroke buttons: 64 position: 15@310 handler: nil wasHandled: true keyValue: 100 charCode: 100 scanCode: 2 TextMorphForEditView(Morph)>>handleEvent: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView(Morph)>>handleFocusEvent: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] focusHolder: a TextMorphForEditView(786432) result: #(nil) Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil [aBlock value] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(425197568) [world] Arguments and temporary variables: aBlock: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder ...etc... Receiver's instance variables: bounds: 0@0 corner: 976@662 owner: nil submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc... fullBounds: 0@0 corner: 976@662 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) backgroundMorph: nil worldState: a WorldState griddingOn: nil BlockClosure>>on:do: Receiver: [aBlock value] Arguments and temporary variables: exception: Error handlerAction: [:ex | ActiveWorld := priorWorld. ActiveEvent := priorEvent. ...etc... handlerActive: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0 PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(425197568) [world] Arguments and temporary variables: aBlock: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder ...etc... priorWorld: a PasteUpMorph(425197568) [world] priorHand: a HandMorph(843055104) priorEvent: nil Receiver's instance variables: bounds: 0@0 corner: 976@662 owner: nil submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc... fullBounds: 0@0 corner: 976@662 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) backgroundMorph: nil worldState: a WorldState griddingOn: nil HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] focusHolder: a TextMorphForEditView(786432) aBlock: [self keyboardFocus: nil] w: a PasteUpMorph(425197568) [world] result: #(nil) Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>sendEvent:focus:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] focusHolder: a TextMorphForEditView(786432) aBlock: [self keyboardFocus: nil] result: nil Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>sendKeyboardEvent: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>handleEvent: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] evt: [keystroke '<Cmd-d>'] ofs: nil Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>processEvents Receiver: a HandMorph(843055104) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] evtBuf: #(2 12927 100 0 8 100 0 1) type: 2 hadAny: true Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil --- The full stack --- ByteString class(Object)>>error: ByteString class(Object)>>primitiveFailed: ByteString class(Object)>>primitiveFailed ByteString class(Behavior)>>basicNew: ByteString class(String class)>>new: ByteString(SequenceableCollection)>>copyFrom:to: Text>>copyFrom:to: SmalltalkEditor(TextEditor)>>selection Compiler>>evaluate:in:to:notifying:ifFail:logged: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self ifFail: [FakeClassPool adopt: nil. ^ #failedDoit] logged: true] in SmalltalkEditor>>evaluateSelection BlockClosure>>on:do: SmalltalkEditor>>evaluateSelection SmalltalkEditor>>doIt SmalltalkEditor>>doIt: SmalltalkEditor(TextEditor)>>dispatchOn: SmalltalkEditor(TextEditor)>>processKeyStroke: SmalltalkEditor(TextEditor)>>keystroke: [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView(TextMorph)>>handleInteraction: TextMorphForEditView>>handleInteraction: [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: ECToolSet class>>codeCompletionAround:textMorph:keyStroke: DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView>>keyStroke: TextMorphForEditView(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: TextMorphForEditView(Morph)>>handleEvent: TextMorphForEditView(Morph)>>handleFocusEvent: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: [aBlock value] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: HandMorph>>handleEvent: HandMorph>>processEvents - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - [:h | ActiveHand := h. h processEvents. ActiveHand := nil] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [[World doOneCycle. Processor yield. false] whileFalse. nil] in Project class>>spawnNewProcess [self value. Processor terminateActive] in BlockClosure>>newProcess SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Data/Downloads/Pharo-1.2 Trusted Dir /foobar/tooBar/forSqueak/bogus/ Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak/ ByteString class(Object)>>error: Receiver: ByteString Arguments and temporary variables: aString: 'basicNew: failed' Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(Object)>>primitiveFailed: Receiver: ByteString Arguments and temporary variables: selector: #basicNew: Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(Object)>>primitiveFailed Receiver: ByteString Arguments and temporary variables: Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(Behavior)>>basicNew: Receiver: ByteString Arguments and temporary variables: sizeRequested: -1 Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString class(String class)>>new: Receiver: ByteString Arguments and temporary variables: sizeRequested: -1 Receiver's instance variables: superclass: String methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc... format: 23554 instanceVariables: nil organization: ('*xml-parser' applyLanguageInfomation:) ('accessing' at: at:put:...etc... subclasses: nil name: #ByteString classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Collections-Strings' traitComposition: {} localSelectors: nil ByteString(SequenceableCollection)>>copyFrom:to: Receiver: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc... Arguments and temporary variables: start: 550 stop: 548 newSize: -1 Receiver's instance variables: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc... Text>>copyFrom:to: Receiver: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which ...etc... Arguments and temporary variables: start: 550 stop: 563 realStart: 550 realStop: 548 Receiver's instance variables: string: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do I...etc... runs: a RunArray runs: #(212 2 1 1 1 1 1 1 2 166 2 4 1 5 1 2 4 1 3 1 2 79 2 14 ...etc... SmalltalkEditor(TextEditor)>>selection Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: textOrStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc... aContext: nil receiver: nil aRequestor: a SmalltalkEditor failBlock: [FakeClassPool adopt: nil. ^ #failedDoit] logFlag: true methodNode: DoIt ^ ProfStef next method: (UndefinedObject>>#DoIt "a CompiledMethod(656408576)") value: a LessonView toLog: nil itsSelection: nil itsSelectionString: nil Receiver's instance variables: sourceStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc... requestor: a SmalltalkEditor class: UndefinedObject category: nil context: nil parser: a Parser [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self ifFail: [FakeClassPool adopt: nil. ^ #failedDoit] logged: true] in SmalltalkEditor>>evaluateSelection Receiver: a SmalltalkEditor Arguments and temporary variables: rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState BlockClosure>>on:do: Receiver: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: ...etc... Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [:ex | ex resume: true] handlerActive: true Receiver's instance variables: outerContext: SmalltalkEditor>>evaluateSelection startpc: 116 numArgs: 0 SmalltalkEditor>>evaluateSelection Receiver: a SmalltalkEditor Arguments and temporary variables: result: nil rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor>>doIt Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor>>doIt: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>dispatchOn: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] asciiValue: 100 honorCommandKeys: true char: nil Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>processKeyStroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>keystroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(786432) selectionShowing: true model: a LessonView editingState: a SmalltalkEditingState [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView(TextMorph)>>handleInteraction: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: interactionBlock: [editor keystroke: evt] oldEditor: a SmalltalkEditor oldParagraph: a MultiNewParagraph oldText: a Text for '"Cool ! (I like to say Cooool :) ). You''ve just executed ...etc... Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView>>handleInteraction: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: interActionBlock: [editor keystroke: evt] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] action: nil Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false ECToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ECToolSet Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(786432) evt: [keystroke '<Cmd-d>'] completionAllowed: false editor: a SmalltalkEditor stringHolder: a LessonView 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: a SystemDictionary(lots of globals) category: #'Ocompletion-ECSqueak' traitComposition: {} localSelectors: nil DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: DEVToolSet Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(786432) 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: a SystemDictionary(lots of globals) category: #ImageForDevelopers traitComposition: {} localSelectors: nil ToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ToolSet Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(786432) 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: a SystemDictionary(lots of globals) category: #'System-Applications' traitComposition: nil localSelectors: nil registeredClasses: an OrderedCollection(StandardToolSet ECToolSet DEVToolSet) default: DEVToolSet TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView>>keyStroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] view: a PluggableShoutMorph(1061158912) Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView(TextMorph)>>handleKeystroke: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] pasteUp: nil Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false KeyboardEvent>>sentTo: Receiver: [keystroke '<Cmd-d>'] Arguments and temporary variables: anObject: a TextMorphForEditView(786432) Receiver's instance variables: timeStamp: 12927 source: a HandMorph(843055104) windowIndex: nil type: #keystroke buttons: 64 position: 15@310 handler: nil wasHandled: true keyValue: 100 charCode: 100 scanCode: 2 TextMorphForEditView(Morph)>>handleEvent: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false TextMorphForEditView(Morph)>>handleFocusEvent: Receiver: a TextMorphForEditView(786432) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 450@354 owner: a TransformMorph(1005322240) submorphs: #() fullBounds: 0@0 corner: 450@354 color: Color black extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableShoutMorph(1061158912) acceptOnCR: false [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] focusHolder: a TextMorphForEditView(786432) result: #(nil) Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil [aBlock value] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(425197568) [world] Arguments and temporary variables: aBlock: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder ...etc... Receiver's instance variables: bounds: 0@0 corner: 976@662 owner: nil submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc... fullBounds: 0@0 corner: 976@662 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) backgroundMorph: nil worldState: a WorldState griddingOn: nil BlockClosure>>on:do: Receiver: [aBlock value] Arguments and temporary variables: exception: Error handlerAction: [:ex | ActiveWorld := priorWorld. ActiveEvent := priorEvent. ...etc... handlerActive: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0 PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(425197568) [world] Arguments and temporary variables: aBlock: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder ...etc... priorWorld: a PasteUpMorph(425197568) [world] priorHand: a HandMorph(843055104) priorEvent: nil Receiver's instance variables: bounds: 0@0 corner: 976@662 owner: nil submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc... fullBounds: 0@0 corner: 976@662 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) backgroundMorph: nil worldState: a WorldState griddingOn: nil HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] focusHolder: a TextMorphForEditView(786432) aBlock: [self keyboardFocus: nil] w: a PasteUpMorph(425197568) [world] result: #(nil) Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>sendEvent:focus:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] focusHolder: a TextMorphForEditView(786432) aBlock: [self keyboardFocus: nil] result: nil Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>sendKeyboardEvent: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>handleEvent: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] evt: [keystroke '<Cmd-d>'] ofs: nil Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil HandMorph>>processEvents Receiver: a HandMorph(843055104) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] evtBuf: #(2 12927 100 0 8 100 0 1) type: 2 hadAny: true Receiver's instance variables: bounds: 435@557 corner: 451@573 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 435@557 corner: 451@573 color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [438@556 435@557 mouseMove 41062 nil] targetOffset: 93@0 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: false temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 41062 437 557 0 0 0 1) lastKeyScanCode: 36 combinedChar: nil --- The full stack --- ByteString class(Object)>>error: ByteString class(Object)>>primitiveFailed: ByteString class(Object)>>primitiveFailed ByteString class(Behavior)>>basicNew: ByteString class(String class)>>new: ByteString(SequenceableCollection)>>copyFrom:to: Text>>copyFrom:to: SmalltalkEditor(TextEditor)>>selection Compiler>>evaluate:in:to:notifying:ifFail:logged: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self ifFail: [FakeClassPool adopt: nil. ^ #failedDoit] logged: true] in SmalltalkEditor>>evaluateSelection BlockClosure>>on:do: SmalltalkEditor>>evaluateSelection SmalltalkEditor>>doIt SmalltalkEditor>>doIt: SmalltalkEditor(TextEditor)>>dispatchOn: SmalltalkEditor(TextEditor)>>processKeyStroke: SmalltalkEditor(TextEditor)>>keystroke: [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView(TextMorph)>>handleInteraction: TextMorphForEditView>>handleInteraction: [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: ECToolSet class>>codeCompletionAround:textMorph:keyStroke: DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView>>keyStroke: TextMorphForEditView(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: TextMorphForEditView(Morph)>>handleEvent: TextMorphForEditView(Morph)>>handleFocusEvent: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: [aBlock value] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: HandMorph>>handleEvent: HandMorph>>processEvents - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - [:h | ActiveHand := h. h processEvents. ActiveHand := nil] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [[World doOneCycle. Processor yield. false] whileFalse. nil] in Project class>>spawnNewProcess [self value. Processor terminateActive] in BlockClosure>>newProcess

Jan. 31, 2011

[Pharo-project] can ok be bound to enter in pharo-dev dialogs?

by StÃ©phane Ducasse

Tx

Jan. 31, 2011

[Pharo-project] [update 1.2] #12328

by StÃ©phane Ducasse

12328 ----- - Issue 3626: Clipboard broken on Unix Stef

Jan. 31, 2011