in latest core 414 Blink cursor does not work and pops up a DNU. Argh I should not have pushed this fix in pharo. Torsten can yo have a look? VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.1.1b2 Image: Pharo1.0beta [Latest update: #10414] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/ducasse/Workspace/FirstCircle/ActiveResearch/Pharo/ Pharo Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak TextMorphForEditView(Object)>>doesNotUnderstand: #onBlinkCursor Receiver: a TextMorphForEditView(3667) Arguments and temporary variables: aMessage: onBlinkCursor exception: MessageNotUnderstood: TextMorphForEditView>>onBlinkCursor resumeValue: nil Receiver's instance variables: bounds: 0@0 corner: 429@114 owner: a TransformMorph(1088) submorphs: #() fullBounds: 0@0 corner: 429@114 color: Color black extension: a MorphExtension (3610) [other: (blinkStart -> 43651)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle Accuny12(FontSet) text: a Text for 'ScriptLoader new installingInstaller |i| i := Installer mont...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: nil container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: a TextMorphCommandHistory editView: a PluggableTextMorph(20) acceptOnCR: false StepMessage(MessageSend)>>value Receiver: StepMessage(#onBlinkCursor -> a TextMorphForEditView(3667)) (a TextMorphForEditView(3667) #...etc... Arguments and temporary variables: Receiver's instance variables: receiver: a TextMorphForEditView(3667) selector: #onBlinkCursor arguments: nil scheduledTime: 622667 numArgs: 0 stepTime: 500 StepMessage(MorphicAlarm)>>value: Receiver: StepMessage(#onBlinkCursor -> a TextMorphForEditView(3667)) (a TextMorphForEditView(3667) #...etc... Arguments and temporary variables: anArgument: 622684 nArgs: 0 Receiver's instance variables: receiver: a TextMorphForEditView(3667) selector: #onBlinkCursor arguments: nil scheduledTime: 622667 numArgs: 0 stepTime: 500 WorldState>>runLocalStepMethodsIn: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(1622) [world] now: 622684 morphToStep: a TextMorphForEditView(3667) stepTime: nil priorWorld: a PasteUpMorph(1622) [world] Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 1174@762 canvas: a FormCanvas on: DisplayScreen(1174x762x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> a SystemWindow(2954))(a SystemWindow(2...etc... lastStepTime: 692461 lastStepMessage: nil lastCycleTime: 692422 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 692461 WorldState>>runStepMethodsIn: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(1622) [world] queue: a SharedQueue nextInQueue: nil Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 1174@762 canvas: a FormCanvas on: DisplayScreen(1174x762x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> a SystemWindow(2954))(a SystemWindow(2...etc... lastStepTime: 692461 lastStepMessage: nil lastCycleTime: 692422 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 692461 PasteUpMorph>>runStepMethods Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: Receiver's instance variables: bounds: 0@0 corner: 1174@762 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(2954) a SystemWindow(87...etc... fullBounds: 0@0 corner: 1174@762 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 WorldState>>doOneCycleNowFor: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(1622) [world] Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 1174@762 canvas: a FormCanvas on: DisplayScreen(1174x762x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> a SystemWindow(2954))(a SystemWindow(2...etc... lastStepTime: 692461 lastStepMessage: nil lastCycleTime: 692422 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 692461 WorldState>>doOneCycleFor: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(1622) [world] Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 1174@762 canvas: a FormCanvas on: DisplayScreen(1174x762x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> a SystemWindow(2954))(a SystemWindow(2...etc... lastStepTime: 692461 lastStepMessage: nil lastCycleTime: 692422 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 692461 PasteUpMorph>>doOneCycle Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: Receiver's instance variables: bounds: 0@0 corner: 1174@762 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(2954) a SystemWindow(87...etc... fullBounds: 0@0 corner: 1174@762 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 [] in Project class>>spawnNewProcess Receiver: Project Arguments and temporary variables: Receiver's instance variables: superclass: Model methodDict: a MethodDictionary(size 167) format: 172 instanceVariables: #('world' 'changeSet' 'transcript' 'parentProject' 'previous...etc... organization: ('*sound') ('accessing' addSubProjectNamesTo:indentation: changeS...etc... subclasses: nil name: #Project classPool: a Dictionary(#AllProjects->an OrderedCollection(a Project(Unnamed)) ...etc... sharedPools: nil environment: Smalltalk category: #'System-Support' traitComposition: {} localSelectors: nil [] in BlockClosure>>newProcess Receiver: [closure] in Project class>>spawnNewProcess Arguments and temporary variables: Receiver's instance variables: outerContext: Project class>>spawnNewProcess startpc: 53 numArgs: 0 --- The full stack --- TextMorphForEditView(Object)>>doesNotUnderstand: #onBlinkCursor StepMessage(MessageSend)>>value StepMessage(MorphicAlarm)>>value: WorldState>>runLocalStepMethodsIn: WorldState>>runStepMethodsIn: PasteUpMorph>>runStepMethods WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess [] in BlockClosure>>newProcess