[squeak-dev] Error with "Open" button in Morphic Designer in Trunk

David O'Toole deeteeoh1138 at gmail.com
Thu Feb 3 15:32:09 UTC 2022


I'm trying to open an existing design in Morphic Designer (development
version), in Trunk but it gives an error (see attached.)
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220203/4bf99e85/attachment-0001.html>
-------------- next part --------------
29 January 2022 3:27:10.339941 pm

VM: unix - Smalltalk
Image: Squeak6.0alpha [latest update: #21120]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /home/dto/Squeak6-future/shared
Trusted Dir /home/dto/Squeak6-future/shared/secure
Untrusted Dir /home/dto/Squeak6-future/shared/My Squeak

UiMessageListDialogUi class(Object)>>error:
	Receiver: UiMessageListDialogUi
	Arguments and temporary variables: 
		aString: 	'Instances of UiMessageListDialogUi class are not indexable'
	Receiver's instance variables: 
		superclass: 	UserInterface
		methodDict: 	a MethodDictionary(#cancelButton->(UiMessageListDialogUi>>#cancelBu...etc...
		format: 	65543
		instanceVariables: 	#('messageList' 'unnamedMorph1' 'unnamedMorph2' 'okButton' 'cancelButton...etc...
		organization: 	('accessing' cancelButton messageList okButton)
('ui - private' initializePanel...etc...
		subclasses: 	nil
		name: 	#UiMessageListDialogUi
		classPool: 	nil
		sharedPools: 	nil
		environment: 	Smalltalk
		category: 	#'WidgetTools-MessageListDialog'

UiMessageListDialogUi class(Object)>>errorNotIndexable
	Receiver: UiMessageListDialogUi
	Arguments and temporary variables: 

	Receiver's instance variables: 
		superclass: 	UserInterface
		methodDict: 	a MethodDictionary(#cancelButton->(UiMessageListDialogUi>>#cancelBu...etc...
		format: 	65543
		instanceVariables: 	#('messageList' 'unnamedMorph1' 'unnamedMorph2' 'okButton' 'cancelButton...etc...
		organization: 	('accessing' cancelButton messageList okButton)
('ui - private' initializePanel...etc...
		subclasses: 	nil
		name: 	#UiMessageListDialogUi
		classPool: 	nil
		sharedPools: 	nil
		environment: 	Smalltalk
		category: 	#'WidgetTools-MessageListDialog'

UiMessageListDialogUi class(Object)>>size
	Receiver: UiMessageListDialogUi
	Arguments and temporary variables: 

	Receiver's instance variables: 
		superclass: 	UserInterface
		methodDict: 	a MethodDictionary(#cancelButton->(UiMessageListDialogUi>>#cancelBu...etc...
		format: 	65543
		instanceVariables: 	#('messageList' 'unnamedMorph1' 'unnamedMorph2' 'okButton' 'cancelButton...etc...
		organization: 	('accessing' cancelButton messageList okButton)
('ui - private' initializePanel...etc...
		subclasses: 	nil
		name: 	#UiMessageListDialogUi
		classPool: 	nil
		sharedPools: 	nil
		environment: 	Smalltalk
		category: 	#'WidgetTools-MessageListDialog'

[] in ListChooser>>initialExtent
	Receiver: a ListChooser
	Arguments and temporary variables: 
		listFont: 	a StrikeFont(Bitmap DejaVu Sans 10.5pt 96ppi 14px Normal)
		itemCount: 	18
		maxItemSize: 	nil
		cellSize: 	nil
		max: 	0
		item: 	UiMessageListDialogUi
	Receiver's instance variables: 
		dependents: 	nil
		selectedIndex: 	nil
		items: 	an OrderedCollection(UiMessageListDialogUi UiSystemProgressMorphUi UiSystemSearchUi...etc...
		searchText: 	nil
		addAllowed: 	false
		result: 	nil
		title: 	'Select UI class'
		listMorph: 	nil
		dialogMorph: 	nil

[] in OrderedCollection(Collection)>>inject:into:
	Receiver: an OrderedCollection(UiMessageListDialogUi UiSystemProgressMorphUi UiSystemSearchUi UiDesignerMenuUi...etc...
	Arguments and temporary variables: 
		thisValue: 	0
		binaryBlock: 	[closure] in ListChooser>>initialExtent
		nextValue: 	0
		each: 	UiMessageListDialogUi
	Receiver's instance variables: 
		array: 	{UiMessageListDialogUi . UiSystemProgressMorphUi . UiSystemSearchUi . UiDesignerMenuUi...etc...
		firstIndex: 	1
		lastIndex: 	18

OrderedCollection>>do:
	Receiver: an OrderedCollection(UiMessageListDialogUi UiSystemProgressMorphUi UiSystemSearchUi UiDesignerMenuUi...etc...
	Arguments and temporary variables: 
		aBlock: 	[closure] in OrderedCollection(Collection)>>inject:into:
		index: 	1
	Receiver's instance variables: 
		array: 	{UiMessageListDialogUi . UiSystemProgressMorphUi . UiSystemSearchUi . UiDesignerMenuUi...etc...
		firstIndex: 	1
		lastIndex: 	18

OrderedCollection(Collection)>>inject:into:
	Receiver: an OrderedCollection(UiMessageListDialogUi UiSystemProgressMorphUi UiSystemSearchUi UiDesignerMenuUi...etc...
	Arguments and temporary variables: 
		thisValue: 	0
		binaryBlock: 	[closure] in ListChooser>>initialExtent
		nextValue: 	0
	Receiver's instance variables: 
		array: 	{UiMessageListDialogUi . UiSystemProgressMorphUi . UiSystemSearchUi . UiDesignerMenuUi...etc...
		firstIndex: 	1
		lastIndex: 	18

ListChooser>>initialExtent
	Receiver: a ListChooser
	Arguments and temporary variables: 
		listFont: 	a StrikeFont(Bitmap DejaVu Sans 10.5pt 96ppi 14px Normal)
		itemCount: 	18
		maxItemSize: 	nil
		cellSize: 	nil
	Receiver's instance variables: 
		dependents: 	nil
		selectedIndex: 	nil
		items: 	an OrderedCollection(UiMessageListDialogUi UiSystemProgressMorphUi UiSystemSearchUi...etc...
		searchText: 	nil
		addAllowed: 	false
		result: 	nil
		title: 	'Select UI class'
		listMorph: 	nil
		dialogMorph: 	nil

ListChooser>>buildWith:
	Receiver: a ListChooser
	Arguments and temporary variables: 
		builder: 	a MorphicToolBuilder
		dialogSpec: 	nil
		searchBarHeight: 	24.5
		listSpec: 	nil
		fieldSpec: 	nil
	Receiver's instance variables: 
		dependents: 	nil
		selectedIndex: 	nil
		items: 	an OrderedCollection(UiMessageListDialogUi UiSystemProgressMorphUi UiSystemSearchUi...etc...
		searchText: 	nil
		addAllowed: 	false
		result: 	nil
		title: 	'Select UI class'
		listMorph: 	nil
		dialogMorph: 	nil

MorphicToolBuilder(ToolBuilder)>>build:
	Receiver: a MorphicToolBuilder
	Arguments and temporary variables: 
		anObject: 	a ListChooser
	Receiver's instance variables: 
		parent: 	nil
		widgets: 	nil
		panes: 	nil
		parentMenu: 	nil

MorphicToolBuilder>>open:
	Receiver: a MorphicToolBuilder
	Arguments and temporary variables: 
		anObject: 	a ListChooser
	Receiver's instance variables: 
		parent: 	nil
		widgets: 	nil
		panes: 	nil
		parentMenu: 	nil

ToolBuilder class>>open:
	Receiver: ToolBuilder
	Arguments and temporary variables: 
		aClass: 	a ListChooser
	Receiver's instance variables: 
		superclass: 	Object
		methodDict: 	a MethodDictionary(#build:->(ToolBuilder>>#build: "a CompiledMethod...etc...
		format: 	65537
		instanceVariables: 	#('parent')
		organization: 	('accessing' parent parent: widgetAt: widgetAt:ifAbsent:)
('building...etc...
		subclasses: 	{SUnitToolBuilder . MorphicToolBuilder . MVCToolBuilder}
		name: 	#ToolBuilder
		classPool: 	a Dictionary()
		sharedPools: 	nil
		environment: 	Smalltalk
		category: 	#'ToolBuilder-Kernel'

ListChooser>>chooseItemFrom:title:addAllowed:
	Receiver: a ListChooser
	Arguments and temporary variables: 
		labelList: 	{UiMessageListDialogUi . UiSystemProgressMorphUi . UiSystemSearchUi ...etc...
		aString: 	'Select UI class'
		aBoolean: 	false
	Receiver's instance variables: 
		dependents: 	nil
		selectedIndex: 	nil
		items: 	an OrderedCollection(UiMessageListDialogUi UiSystemProgressMorphUi UiSystemSearchUi...etc...
		searchText: 	nil
		addAllowed: 	false
		result: 	nil
		title: 	'Select UI class'
		listMorph: 	nil
		dialogMorph: 	nil

ListChooser class>>chooseItemFrom:title:addAllowed:
	Receiver: ListChooser
	Arguments and temporary variables: 
		aList: 	{UiMessageListDialogUi . UiSystemProgressMorphUi . UiSystemSearchUi . UiDesignerMenuUi...etc...
		aString: 	'Select UI class'
		aBoolean: 	false
	Receiver's instance variables: 
		superclass: 	Model
		methodDict: 	a MethodDictionary(#accept->(ListChooser>>#accept "a CompiledMethod...etc...
		format: 	65545
		instanceVariables: 	#('selectedIndex' 'items' 'searchText' 'addAllowed' 'result'...etc...
		organization: 	('event handling' filterEvent:for:)
('building' buildWith: initialExtent...etc...
		subclasses: 	nil
		name: 	#ListChooser
		classPool: 	nil
		sharedPools: 	nil
		environment: 	Smalltalk
		category: 	#'ToolBuilder-Morphic-Tools'

ListChooser class>>chooseItemFrom:title:
	Receiver: ListChooser
	Arguments and temporary variables: 
		aList: 	{UiMessageListDialogUi . UiSystemProgressMorphUi . UiSystemSearchUi . UiDesignerMenuUi...etc...
		aString: 	'Select UI class'
	Receiver's instance variables: 
		superclass: 	Model
		methodDict: 	a MethodDictionary(#accept->(ListChooser>>#accept "a CompiledMethod...etc...
		format: 	65545
		instanceVariables: 	#('selectedIndex' 'items' 'searchText' 'addAllowed' 'result'...etc...
		organization: 	('event handling' filterEvent:for:)
('building' buildWith: initialExtent...etc...
		subclasses: 	nil
		name: 	#ListChooser
		classPool: 	nil
		sharedPools: 	nil
		environment: 	Smalltalk
		category: 	#'ToolBuilder-Morphic-Tools'

UiDesigner>>load
	Receiver: an UiDesigner(2237837)
	Arguments and temporary variables: 
		result: 	nil
		designClass: 	nil
	Receiver's instance variables: 
		bounds: 	1104 at 185 corner: 1904 at 785
		owner: 	a SystemWindow<Morphic Designer>(1831206)
		submorphs: 	{an UiContainer(1760982)}
		fullBounds: 	1104 at 185 corner: 1904 at 785
		color: 	(Color r: 0.85 g: 0.85 b: 0.85)
		extension: 	a MorphExtension (3573711) [locked]  [other:  (layoutFrame -> a Layo...etc...
		ui: 	an UiDesignerUi
		container: 	nil
		propertyTable: 	an UiPropertyTable(936950)

[] in [] in [] in [] in UiPushButton(Object)>>emitSignal:arguments:sender:
	Receiver: an UiPushButton(1538388)
	Arguments and temporary variables: 
		signal: 	nil
		args: 	nil
		aSender: 	nil
		actions: 	nil
		association: 	an UiDesigner(2237837)->an OrderedCollection(a SignalConnectionConfiguration...etc...
		receiver: 	an UiDesigner(2237837)
		connectionConfiguration: 	a SignalConnectionConfiguration
		selector: 	#load
		pattern: 	nil
		queue: 	nil
		filteredArgs: 	#()
		blocking: 	nil
		forceUiProcess: 	nil
		thisProcess: 	nil
	Receiver's instance variables: 
		bounds: 	1292 at 560 corner: 1476 at 586
		owner: 	an UiContainer(3112842)
		submorphs: 	{an ImageMorph(136141) . a TextMorph(2235560)}
		fullBounds: 	1291 at 559 corner: 1477 at 587
		color: 	Color silver
		extension: 	a MorphExtension (497444) [eventHandler = an UiEventHandler]  [other...etc...
		checkable: 	false
		checked: 	false
		down: 	false
		icon: 	Form(16x16x32)
		text: 	'Open Design...'
		autoExclusive: 	false
		enabled: 	true
		outerBorderWidth: 	1

[] in UiPushButton(Object)>>emitSignal:arguments:sender:
	Receiver: an UiPushButton(1538388)
	Arguments and temporary variables: 
		signal: 	#clicked:
		args: 	#(false)
		aSender: 	an UiPushButton(1538388)
		actions: 	an OrderedCollection([closure] in [] in [] in [] in UiPushButton(Object...etc...
		action: 	[closure] in [] in [] in [] in UiPushButton(Object)>>emitSignal:arguments:sender:...etc...
	Receiver's instance variables: 
		bounds: 	1292 at 560 corner: 1476 at 586
		owner: 	an UiContainer(3112842)
		submorphs: 	{an ImageMorph(136141) . a TextMorph(2235560)}
		fullBounds: 	1291 at 559 corner: 1477 at 587
		color: 	Color silver
		extension: 	a MorphExtension (497444) [eventHandler = an UiEventHandler]  [other...etc...
		checkable: 	false
		checked: 	false
		down: 	false
		icon: 	Form(16x16x32)
		text: 	'Open Design...'
		autoExclusive: 	false
		enabled: 	true
		outerBorderWidth: 	1

OrderedCollection>>do:
	Receiver: an OrderedCollection([closure] in [] in [] in [] in UiPushButton(Object)>>emitSignal:arguments:sender:...etc...
	Arguments and temporary variables: 
		aBlock: 	[closure] in UiPushButton(Object)>>emitSignal:arguments:sender:
		index: 	1
	Receiver's instance variables: 
		array: 	{[closure] in [] in [] in [] in UiPushButton(Object)>>emitSignal:arguments:sender:...etc...
		firstIndex: 	1
		lastIndex: 	2


--- The full stack ---
UiMessageListDialogUi class(Object)>>error:
UiMessageListDialogUi class(Object)>>errorNotIndexable
UiMessageListDialogUi class(Object)>>size
[] in ListChooser>>initialExtent
[] in OrderedCollection(Collection)>>inject:into:
OrderedCollection>>do:
OrderedCollection(Collection)>>inject:into:
ListChooser>>initialExtent
ListChooser>>buildWith:
MorphicToolBuilder(ToolBuilder)>>build:
MorphicToolBuilder>>open:
ToolBuilder class>>open:
ListChooser>>chooseItemFrom:title:addAllowed:
ListChooser class>>chooseItemFrom:title:addAllowed:
ListChooser class>>chooseItemFrom:title:
UiDesigner>>load
[] in [] in [] in [] in UiPushButton(Object)>>emitSignal:arguments:sender:
[] in UiPushButton(Object)>>emitSignal:arguments:sender:
OrderedCollection>>do:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
UiPushButton(Object)>>emitSignal:arguments:sender:
UiPushButton(Object)>>emit
UiPushButton(UiButton)>>clicked:
UiPushButton(UiButton)>>release:
[] in [] in [] in [] in UiEventHandler(Object)>>emitSignal:arguments:sender:
[] in UiEventHandler(Object)>>emitSignal:arguments:sender:
OrderedCollection>>do:
UiEventHandler(Object)>>emitSignal:arguments:sender:
UiEventHandler(Object)>>emit
UiEventHandler>>mouseReleased:
UiEventHandler>>mouseUp:fromMorph:
UiPushButton(Morph)>>mouseUp:
UiPushButton(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
UiPushButton(Morph)>>handleEvent:
UiPushButton(Morph)>>handleFocusEvent:
MorphicEventDispatcher>>doHandlingForFocusEvent:with:
MorphicEventDispatcher>>dispatchFocusEvent:with:
UiPushButton(Morph)>>processFocusEvent:using:
UiPushButton(Morph)>>processFocusEvent:
[] in [] in [] in HandMorph>>sendFocusEvent:to:clear:
[] in ActiveEventVariable class(DynamicVariable class)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveEventVariable class(DynamicVariable class)>>value:during:
[] in ActiveEventVariable class>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveEventVariable class>>value:during:
MouseButtonEvent(MorphicEvent)>>becomeActiveDuring:
[] in [] in HandMorph>>sendFocusEvent:to:clear:
[] in ActiveHandVariable class(DynamicVariable class)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveHandVariable class(DynamicVariable class)>>value:during:
[] in ActiveHandVariable class>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveHandVariable class>>value:during:
HandMorph>>becomeActiveDuring:
[] in HandMorph>>sendFocusEvent:to:clear:
[] in ActiveWorldVariable class(DynamicVariable class)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveWorldVariable class(DynamicVariable class)>>value:during:
[] in ActiveWorldVariable class>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
-- and more not shown --


More information about the Squeak-dev mailing list