[BUG]TextEmphasis class(Object)>>doesNotUnderstand: #plain
caggiano at crystal-objects.com
caggiano at crystal-objects.com
Thu Jan 29 16:33:59 UTC 2004
In a workspace do:
(StringMorph contents: 'a string') openInWorld.
Open the stringMorph Menu and select change emphasis>>plain
The Problem is that TextEmphasis's method for non-empasized text is
'normal'
To fix in StringMorph>>changeEmphasis change
aList #(#plain #bold #italic ....
to
aList #(#normal #bold #italic ....
29 January 2004 11:20:04 am
VM: Win32 - a SmalltalkImage
Image: Squeak3.7alpha [latest update: #5657]
TextEmphasis class(Object)>>doesNotUnderstand: #plain
Receiver: TextEmphasis
Arguments and temporary variables:
aMessage: plain
Receiver's instance variables:
superclass: TextAttribute
methodDict: a MethodDictionary(#=->a CompiledMethod (3882)
#dominatedByCmd0->a ...etc...
format: 134
instanceVariables: #('emphasisCode' 'setMode')
organization: ('as yet unclassified' = dominatedByCmd0 dominates:
emphasisCode ...etc...
subclasses: nil
name: #TextEmphasis
classPool: nil
sharedPools: nil
environment: nil
category: nil
StringMorph>>changeEmphasis
Receiver: a StringMorph(330)'a string'
Arguments and temporary variables:
reply: #plain
aList: #(#plain #bold #italic #narrow #underlined #struckOut)
Receiver's instance variables:
bounds: 42 at 216 corner: 88 at 228
owner: a PasteUpMorph(1622) [world]
submorphs: #()
fullBounds: 42 at 216 corner: 88 at 228
color: Color black
extension: a MorphExtension (219)
font: nil
emphasis: 0
contents: 'a string'
hasFocus: false
[] in MenuItemMorph>>invokeWithEvent: {[(selArgCount := selector
numArgs) = 0 ifTrue: [target perform: selector] ...]}
Arguments and temporary variables:
evt: [105 at 440 mouseUp 16814872]
selArgCount: 0
w: a PasteUpMorph(1622) [world]
BlockContext>>ensure:
Receiver: [] in MenuItemMorph>>invokeWithEvent: {[(selArgCount :=
selector numArgs) = 0 ifTrue: [target perform: selector]
...]}...etc...
Arguments and temporary variables:
aBlock: [] in CursorWithMask(Cursor)>>showWhile: {[oldcursor show]}
returnValue: nil
Receiver's instance variables:
sender: BlockContext>>ensure:
pc: 134
stackp: 0
nargs: 0
startpc: 124
home: MenuItemMorph>>invokeWithEvent:
--- The full stack ---
TextEmphasis class(Object)>>doesNotUnderstand: #plain
StringMorph>>changeEmphasis
[] in MenuItemMorph>>invokeWithEvent: {[(selArgCount := selector
numArgs) = 0 ifTrue: [target perform: selector] ...]}
BlockContext>>ensure:
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
CursorWithMask(Cursor)>>showWhile:
MenuItemMorph>>invokeWithEvent:
MenuItemMorph>>mouseUp:
MenuItemMorph>>handleMouseUp:
MouseButtonEvent>>sentTo:
MenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self.
ActiveEvent := anEvent. result := focusHolder han...]}
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor: {[:h | ActiveHand := h. h
processEvents. h isGenieRecognizing ifTrue: [r...]}
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess {[[World doOneCycle. Processor
yield. false] whileFalse. nil]}
[] in BlockContext>>newProcess {[self value. Processor
terminateActive]}
More information about the Squeak-dev
mailing list
|