There is some problem with the progress bar or font renderings or
something while trying to install Magma from SqueakMap.  Stack below.
To reproduce:

1) Launch up Squeak5.1beta-16336-32bit.image (using Eliots latest VM).
2) Open SqueakMap catalog.  In package list, unselect "New
safely-available packages".
3) Find "Magma" in the list.
4) Yellow-click the (head) version, then select "Install".

At some point, the load process ends up sending #changed: to the
SMLoaderPlus model, which ultimately leads to the font access issue.

Best,
  Chris

==============

From: sdf
To: squeak-dev at lists.squeakfoundation.org
Subject: [BUG]UndefinedObject(Object)>>doesNotUnderstand: #fontIndexOf:

here insert explanation of what you were doing, suspect changes you've
made and so forth.

10 August 2016 5:58:07.849777 pm

VM: unix - Smalltalk
Image: Squeak5.1beta [latest update: #16336]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true

UndefinedObject(Object)>>doesNotUnderstand: #fontIndexOf:
Receiver: nil
Arguments and temporary variables:
aMessage: fontIndexOf: a StrikeFont(Bitmap DejaVu Sans 9 14)
exception: MessageNotUnderstood: UndefinedObject>>fontIndexOf:
resumeValue: nil
Receiver's instance variables:
nil

StringMorphAttributeScanner>>initializeFromStringMorph:
Receiver: a StringMorphAttributeScanner
Arguments and temporary variables:
aStringMorph: an IndentingListItemMorph(1603409)nil
style: nil
Receiver's instance variables:
fontNumber: 1
textColor: nil
emphasis: 0
alignment: nil
actualFont: a StrikeFont(Bitmap DejaVu Sans 9 14)
indent: 0
kern: 0

IndentingListItemMorph(StringMorph)>>contents:
Receiver: an IndentingListItemMorph(1603409)nil
Arguments and temporary variables:
newContents: a Text for 'Ma client server ((head))'
scanner: nil
Receiver's instance variables:
bounds: 0 at 0 corner: 50 at 40
owner: nil
submorphs: #()
fullBounds: nil
color: nil
extension: nil
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
emphasis: nil
contents: nil
hasFocus: false
indentLevel: nil
isExpanded: nil
complexContents: a PluggableTreeItemNode
firstChild: nil
container: a PluggableTreeMorph<packagesList>(3226300)
nextSibling: nil
icon: nil
backgroundColor: nil

IndentingListItemMorph(StringMorph)>>initWithContents:font:emphasis:
Receiver: an IndentingListItemMorph(1603409)nil
Arguments and temporary variables:
aString: a Text for 'Ma client server ((head))'
aFont: a StrikeFont(Bitmap DejaVu Sans 9 14)
emphasisCode: nil
Receiver's instance variables:
bounds: 0 at 0 corner: 50 at 40
owner: nil
submorphs: #()
fullBounds: nil
color: nil
extension: nil
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
emphasis: nil
contents: nil
hasFocus: false
indentLevel: nil
isExpanded: nil
complexContents: a PluggableTreeItemNode
firstChild: nil
container: a PluggableTreeMorph<packagesList>(3226300)
nextSibling: nil
icon: nil
backgroundColor: nil

IndentingListItemMorph>>initWithContents:prior:forList:indentLevel:
Receiver: an IndentingListItemMorph(1603409)nil
Arguments and temporary variables:
anObject: a PluggableTreeItemNode
priorMorph: an IndentingListItemMorph(2588928)'Lucy Font Set'
hostList: a PluggableTreeMorph<packagesList>(3226300)
newLevel: 0
Receiver's instance variables:
bounds: 0 at 0 corner: 50 at 40
owner: nil
submorphs: #()
fullBounds: nil
color: nil
extension: nil
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
emphasis: nil
contents: nil
hasFocus: false
indentLevel: nil
isExpanded: nil
complexContents: a PluggableTreeItemNode
firstChild: nil
container: a PluggableTreeMorph<packagesList>(3226300)
nextSibling: nil
icon: nil
backgroundColor: nil

[] in PluggableTreeMorph(SimpleHierarchicalListMorph)>>addMorphsTo:from:allowSorting:withExpandedItems:atLevel:
Receiver: a PluggableTreeMorph<packagesList>(3226300)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
bounds: 158 at 93 corner: 305 at 266
owner: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(2808457...etc...
submorphs: {a ScrollBar(2425968) . a ScrollBar(3352217) . a
TransformMorph(3246...etc...
fullBounds: 158 at 93 corner: 305 at 266
color: Color white
extension: a MorphExtension (419193) [locked]  [externalName =
packagesList ]  ...etc...
borderWidth: 1
borderColor: (Color r: 0.495 g: 0.495 b: 0.495)
model: a SMLoaderPlus
slotName: nil
open: false
scrollBar: a ScrollBar(3352217)
scroller: a TransformMorph(3246492)
retractableScrollBar: false
scrollBarOnLeft: false
getMenuSelector: #packagesMenu:
getMenuTitleSelector: nil
hasFocus: false
hScrollBar: a ScrollBar(2425968)
hScrollBarPolicy: #whenNeeded
vScrollBarPolicy: #whenNeeded
scrollBarThickness: 10
selectedMorph: an IndentingListItemMorph(3688549)'(head)'
hoveredMorph: nil
getListSelector: nil
keystrokeActionSelector: nil
autoDeselect: true
columns: nil
columnsCache: #()
sortingSelector: nil
getSelectionSelector: #selectedItem
setSelectionSelector: #selectedItem:
potentialDropMorph: nil
lineColor: Color veryLightGray
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
textColor: Color black
rootWrappers: {a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode...etc...
selectedWrapper: a PluggableTreeItemNode
getRootsSelector: #packageList
getChildrenSelector: #itemChildren:
hasChildrenSelector: #itemHasChildren:
getLabelSelector: #itemLabel:
getIconSelector: nil
getSelectedPathSelector: #selectedItemPath
setSelectedParentSelector: nil
getHelpSelector: nil
dropItemSelector: nil
wantsDropSelector: nil
dragItemSelector: nil
dragTypeSelector: nil
nodeClass: nil
lastKeystrokeTime: 0
lastKeystrokes: ''
dragStartedSelector: nil

Array(SequenceableCollection)>>do:
Receiver: {a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode . a PluggableTreeItemNode...etc...
Arguments and temporary variables:
aBlock: [closure] in
PluggableTreeMorph(SimpleHierarchicalListMorph)>>addMorphsTo:from:allowSorting:withExpandedItems:atLevel:...etc...
index: 329
indexLimiT: 800
Receiver's instance variables:
{a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode . a PluggableTreeItemNode...etc...

PluggableTreeMorph(SimpleHierarchicalListMorph)>>addMorphsTo:from:allowSorting:withExpandedItems:atLevel:
Receiver: a PluggableTreeMorph<packagesList>(3226300)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
bounds: 158 at 93 corner: 305 at 266
owner: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(2808457...etc...
submorphs: {a ScrollBar(2425968) . a ScrollBar(3352217) . a
TransformMorph(3246...etc...
fullBounds: 158 at 93 corner: 305 at 266
color: Color white
extension: a MorphExtension (419193) [locked]  [externalName =
packagesList ]  ...etc...
borderWidth: 1
borderColor: (Color r: 0.495 g: 0.495 b: 0.495)
model: a SMLoaderPlus
slotName: nil
open: false
scrollBar: a ScrollBar(3352217)
scroller: a TransformMorph(3246492)
retractableScrollBar: false
scrollBarOnLeft: false
getMenuSelector: #packagesMenu:
getMenuTitleSelector: nil
hasFocus: false
hScrollBar: a ScrollBar(2425968)
hScrollBarPolicy: #whenNeeded
vScrollBarPolicy: #whenNeeded
scrollBarThickness: 10
selectedMorph: an IndentingListItemMorph(3688549)'(head)'
hoveredMorph: nil
getListSelector: nil
keystrokeActionSelector: nil
autoDeselect: true
columns: nil
columnsCache: #()
sortingSelector: nil
getSelectionSelector: #selectedItem
setSelectionSelector: #selectedItem:
potentialDropMorph: nil
lineColor: Color veryLightGray
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
textColor: Color black
rootWrappers: {a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode...etc...
selectedWrapper: a PluggableTreeItemNode
getRootsSelector: #packageList
getChildrenSelector: #itemChildren:
hasChildrenSelector: #itemHasChildren:
getLabelSelector: #itemLabel:
getIconSelector: nil
getSelectedPathSelector: #selectedItemPath
setSelectedParentSelector: nil
getHelpSelector: nil
dropItemSelector: nil
wantsDropSelector: nil
dragItemSelector: nil
dragTypeSelector: nil
nodeClass: nil
lastKeystrokeTime: 0
lastKeystrokes: ''
dragStartedSelector: nil

PluggableTreeMorph(SimpleHierarchicalListMorph)>>list:
Receiver: a PluggableTreeMorph<packagesList>(3226300)
Arguments and temporary variables:
aCollection: {a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode...etc...
wereExpanded: {a PluggableTreeItemNode}
morphList: an OrderedCollection(an
IndentingListItemMorph(1027512)'15-Puzzle' a...etc...
Receiver's instance variables:
bounds: 158 at 93 corner: 305 at 266
owner: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(2808457...etc...
submorphs: {a ScrollBar(2425968) . a ScrollBar(3352217) . a
TransformMorph(3246...etc...
fullBounds: 158 at 93 corner: 305 at 266
color: Color white
extension: a MorphExtension (419193) [locked]  [externalName =
packagesList ]  ...etc...
borderWidth: 1
borderColor: (Color r: 0.495 g: 0.495 b: 0.495)
model: a SMLoaderPlus
slotName: nil
open: false
scrollBar: a ScrollBar(3352217)
scroller: a TransformMorph(3246492)
retractableScrollBar: false
scrollBarOnLeft: false
getMenuSelector: #packagesMenu:
getMenuTitleSelector: nil
hasFocus: false
hScrollBar: a ScrollBar(2425968)
hScrollBarPolicy: #whenNeeded
vScrollBarPolicy: #whenNeeded
scrollBarThickness: 10
selectedMorph: an IndentingListItemMorph(3688549)'(head)'
hoveredMorph: nil
getListSelector: nil
keystrokeActionSelector: nil
autoDeselect: true
columns: nil
columnsCache: #()
sortingSelector: nil
getSelectionSelector: #selectedItem
setSelectionSelector: #selectedItem:
potentialDropMorph: nil
lineColor: Color veryLightGray
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
textColor: Color black
rootWrappers: {a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode...etc...
selectedWrapper: a PluggableTreeItemNode
getRootsSelector: #packageList
getChildrenSelector: #itemChildren:
hasChildrenSelector: #itemHasChildren:
getLabelSelector: #itemLabel:
getIconSelector: nil
getSelectedPathSelector: #selectedItemPath
setSelectedParentSelector: nil
getHelpSelector: nil
dropItemSelector: nil
wantsDropSelector: nil
dragItemSelector: nil
dragTypeSelector: nil
nodeClass: nil
lastKeystrokeTime: 0
lastKeystrokes: ''
dragStartedSelector: nil

PluggableTreeMorph>>wrapRoots:
Receiver: a PluggableTreeMorph<packagesList>(3226300)
Arguments and temporary variables:
someObjects: {SMPackage[15-Puzzle] . SMPackage[3.7 Full Assembler] .
SMPackage[...etc...
Receiver's instance variables:
bounds: 158 at 93 corner: 305 at 266
owner: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(2808457...etc...
submorphs: {a ScrollBar(2425968) . a ScrollBar(3352217) . a
TransformMorph(3246...etc...
fullBounds: 158 at 93 corner: 305 at 266
color: Color white
extension: a MorphExtension (419193) [locked]  [externalName =
packagesList ]  ...etc...
borderWidth: 1
borderColor: (Color r: 0.495 g: 0.495 b: 0.495)
model: a SMLoaderPlus
slotName: nil
open: false
scrollBar: a ScrollBar(3352217)
scroller: a TransformMorph(3246492)
retractableScrollBar: false
scrollBarOnLeft: false
getMenuSelector: #packagesMenu:
getMenuTitleSelector: nil
hasFocus: false
hScrollBar: a ScrollBar(2425968)
hScrollBarPolicy: #whenNeeded
vScrollBarPolicy: #whenNeeded
scrollBarThickness: 10
selectedMorph: an IndentingListItemMorph(3688549)'(head)'
hoveredMorph: nil
getListSelector: nil
keystrokeActionSelector: nil
autoDeselect: true
columns: nil
columnsCache: #()
sortingSelector: nil
getSelectionSelector: #selectedItem
setSelectionSelector: #selectedItem:
potentialDropMorph: nil
lineColor: Color veryLightGray
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
textColor: Color black
rootWrappers: {a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode...etc...
selectedWrapper: a PluggableTreeItemNode
getRootsSelector: #packageList
getChildrenSelector: #itemChildren:
hasChildrenSelector: #itemHasChildren:
getLabelSelector: #itemLabel:
getIconSelector: nil
getSelectedPathSelector: #selectedItemPath
setSelectedParentSelector: nil
getHelpSelector: nil
dropItemSelector: nil
wantsDropSelector: nil
dragItemSelector: nil
dragTypeSelector: nil
nodeClass: nil
lastKeystrokeTime: 0
lastKeystrokes: ''
dragStartedSelector: nil

PluggableTreeMorph>>update:
Receiver: a PluggableTreeMorph<packagesList>(3226300)
Arguments and temporary variables:
what: #packageList
Receiver's instance variables:
bounds: 158 at 93 corner: 305 at 266
owner: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(2808457...etc...
submorphs: {a ScrollBar(2425968) . a ScrollBar(3352217) . a
TransformMorph(3246...etc...
fullBounds: 158 at 93 corner: 305 at 266
color: Color white
extension: a MorphExtension (419193) [locked]  [externalName =
packagesList ]  ...etc...
borderWidth: 1
borderColor: (Color r: 0.495 g: 0.495 b: 0.495)
model: a SMLoaderPlus
slotName: nil
open: false
scrollBar: a ScrollBar(3352217)
scroller: a TransformMorph(3246492)
retractableScrollBar: false
scrollBarOnLeft: false
getMenuSelector: #packagesMenu:
getMenuTitleSelector: nil
hasFocus: false
hScrollBar: a ScrollBar(2425968)
hScrollBarPolicy: #whenNeeded
vScrollBarPolicy: #whenNeeded
scrollBarThickness: 10
selectedMorph: an IndentingListItemMorph(3688549)'(head)'
hoveredMorph: nil
getListSelector: nil
keystrokeActionSelector: nil
autoDeselect: true
columns: nil
columnsCache: #()
sortingSelector: nil
getSelectionSelector: #selectedItem
setSelectionSelector: #selectedItem:
potentialDropMorph: nil
lineColor: Color veryLightGray
font: a StrikeFont(Bitmap DejaVu Sans 9 14)
textColor: Color black
rootWrappers: {a PluggableTreeItemNode . a PluggableTreeItemNode . a
PluggableTreeItemNode...etc...
selectedWrapper: a PluggableTreeItemNode
getRootsSelector: #packageList
getChildrenSelector: #itemChildren:
hasChildrenSelector: #itemHasChildren:
getLabelSelector: #itemLabel:
getIconSelector: nil
getSelectedPathSelector: #selectedItemPath
setSelectedParentSelector: nil
getHelpSelector: nil
dropItemSelector: nil
wantsDropSelector: nil
dragItemSelector: nil
dragTypeSelector: nil
nodeClass: nil
lastKeystrokeTime: 0
lastKeystrokes: ''
dragStartedSelector: nil

[] in SMLoaderPlus(Object)>>changed:
Receiver: a SMLoaderPlus
Arguments and temporary variables:
aParameter: a PluggableTreeMorph<packagesList>(3226300)
aDependent: #packageList
Receiver's instance variables:
dependents: a DependentsArray(a PluggableSystemWindow<SqueakMap
Package Loader ...etc...
packagesList: {SMPackage[15-Puzzle] . SMPackage[3.7 Full Assembler] .
SMPackage...etc...
selectedItem: SMPackageRelease[Magma 2-head]
selectedCategory: nil
filters: #()
categoriesToFilterIds: an OrderedCollection()
map: a SMSqueakMap
builder: a MorphicToolBuilder
window: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(280845...etc...

DependentsArray>>do:
Receiver: a DependentsArray(a PluggableSystemWindow<SqueakMap Package
Loader (800 packages)>(2808457...etc...
Arguments and temporary variables:
aBlock: [closure] in SMLoaderPlus(Object)>>changed:
dep: a PluggableTreeMorph<packagesList>(3226300)
i: 12
iLimiT: 14
Receiver's instance variables:
a DependentsArray(a PluggableSystemWindow<SqueakMap Package Loader
(800 packages)>(2808457...etc...

SMLoaderPlus(Object)>>changed:
Receiver: a SMLoaderPlus
Arguments and temporary variables:
aParameter: #packageList
Receiver's instance variables:
dependents: a DependentsArray(a PluggableSystemWindow<SqueakMap
Package Loader ...etc...
packagesList: {SMPackage[15-Puzzle] . SMPackage[3.7 Full Assembler] .
SMPackage...etc...
selectedItem: SMPackageRelease[Magma 2-head]
selectedCategory: nil
filters: #()
categoriesToFilterIds: an OrderedCollection()
map: a SMSqueakMap
builder: a MorphicToolBuilder
window: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(280845...etc...

SMLoaderPlus>>noteChanged
Receiver: a SMLoaderPlus
Arguments and temporary variables:

Receiver's instance variables:
dependents: a DependentsArray(a PluggableSystemWindow<SqueakMap
Package Loader ...etc...
packagesList: {SMPackage[15-Puzzle] . SMPackage[3.7 Full Assembler] .
SMPackage...etc...
selectedItem: SMPackageRelease[Magma 2-head]
selectedCategory: nil
filters: #()
categoriesToFilterIds: an OrderedCollection()
map: a SMSqueakMap
builder: a MorphicToolBuilder
window: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(280845...etc...

[] in [] in SMLoaderPlus>>installPackageRelease:
Receiver: a SMLoaderPlus
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
dependents: a DependentsArray(a PluggableSystemWindow<SqueakMap
Package Loader ...etc...
packagesList: {SMPackage[15-Puzzle] . SMPackage[3.7 Full Assembler] .
SMPackage...etc...
selectedItem: SMPackageRelease[Magma 2-head]
selectedCategory: nil
filters: #()
categoriesToFilterIds: an OrderedCollection()
map: a SMSqueakMap
builder: a MorphicToolBuilder
window: a PluggableSystemWindow<SqueakMap Package Loader (800
packages)>(280845...etc...

[] in MorphicUIManager(UIManager)>>informUser:during:
Receiver: a MorphicUIManager
Arguments and temporary variables:
aString: [closure] in SystemProgressMorph>>position:label:min:max:
aBlock: 'Installing '
bar: [closure] in [] in SMLoaderPlus>>installPackageRelease:
Receiver's instance variables:
builderClass: MorphicToolBuilder

[] in [] in MorphicUIManager>>displayProgress:at:from:to:during:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
builderClass: MorphicToolBuilder

BlockClosure>>on:do:
Receiver: [closure] in [] in
MorphicUIManager>>displayProgress:at:from:to:during:
Arguments and temporary variables:
exceptionOrExceptionSet: ProgressNotification
handlerAction: [closure] in [] in
MorphicUIManager>>displayProgress:at:from:to:during:...etc...
handlerActive: true
Receiver's instance variables:
outerContext: [] in MorphicUIManager>>displayProgress:at:from:to:during:
startpc: 86
numArgs: 0


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #fontIndexOf:
StringMorphAttributeScanner>>initializeFromStringMorph:
IndentingListItemMorph(StringMorph)>>contents:
IndentingListItemMorph(StringMorph)>>initWithContents:font:emphasis:
IndentingListItemMorph>>initWithContents:prior:forList:indentLevel:
[] in PluggableTreeMorph(SimpleHierarchicalListMorph)>>addMorphsTo:from:allowSorting:withExpandedItems:atLevel:
Array(SequenceableCollection)>>do:
PluggableTreeMorph(SimpleHierarchicalListMorph)>>addMorphsTo:from:allowSorting:withExpandedItems:atLevel:
PluggableTreeMorph(SimpleHierarchicalListMorph)>>list:
PluggableTreeMorph>>wrapRoots:
PluggableTreeMorph>>update:
[] in SMLoaderPlus(Object)>>changed:
DependentsArray>>do:
SMLoaderPlus(Object)>>changed:
SMLoaderPlus>>noteChanged
[] in [] in SMLoaderPlus>>installPackageRelease:
[] in MorphicUIManager(UIManager)>>informUser:during:
[] in [] in MorphicUIManager>>displayProgress:at:from:to:during:
BlockClosure>>on:do:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[] in MorphicUIManager>>displayProgress:at:from:to:during:
BlockClosure>>ensure:
MorphicUIManager>>displayProgress:at:from:to:during:
ProgressInitiationException>>defaultResumeValue
ProgressInitiationException(Exception)>>resume
ProgressInitiationException>>defaultAction
UndefinedObject>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
ProgressInitiationException(Exception)>>signal
ProgressInitiationException>>display:at:from:to:during:
ProgressInitiationException class>>display:at:from:to:during:
SystemProgressMorph class>>informUserAt:during:
MorphicUIManager>>informUserDuring:
MorphicUIManager(UIManager)>>informUser:during:
[] in SMLoaderPlus>>installPackageRelease:
BlockClosure>>on:do:
SMLoaderPlus>>installPackageRelease:
SMLoaderPlus>>installPackageRelease
SMLoaderPlus>>perform:orSendTo:
[] in MenuItemMorph>>invokeWithEvent:
BlockClosure>>ensure:
CursorWithMask(Cursor)>>showWhile:
MenuItemMorph>>invokeWithEvent:
MenuItemMorph>>mouseUp:
MenuItemMorph>>handleMouseUp:
MouseButtonEvent>>sentTo:
MenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchEvent:withHandler:withMorph:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuItemMorph(Morph)>>processEvent:using:
[] in MorphicEventDispatcher>>dispatchEvent:toSubmorphsOf:
Array(SequenceableCollection)>>do:
MenuMorph(Morph)>>submorphsDo:
MorphicEventDispatcher>>dispatchEvent:toSubmorphsOf:
MorphicEventDispatcher>>dispatchEvent:withHandler:withMorph:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>doProcessingForFocusEvent:with:
MorphicEventDispatcher>>dispatchFocusEventFully:with:
-- and more not shown --