[squeak-dev] The Inbox: ToolBuilder-Morphic-fbs.58.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Apr 28 20:33:16 UTC 2010


A new version of ToolBuilder-Morphic was added to project The Inbox:
http://source.squeak.org/inbox/ToolBuilder-Morphic-fbs.58.mcz

==================== Summary ====================

Name: ToolBuilder-Morphic-fbs.58
Author: fbs
Time: 28 April 2010, 10:32:38.987 pm
UUID: 5f1f5812-f1d8-824f-8aed-a884428b9fdd
Ancestors: ToolBuilder-Morphic-ar.57

Support for Mantis 7517: a spawned workspace has no context menu. Instead of building the Workspace's model by hand, just ask the Workspace to do it itself.

=============== Diff against ToolBuilder-Morphic-ar.57 ===============

Item was changed:
  ----- Method: MorphicUIManager>>edit:label:accept: (in category 'ui requests') -----
  edit: aText label: labelString accept: anAction
  	"Open an editor on the given string/text"
+ 	| window |
+ 	window := Workspace open.
+ 	window model acceptContents:  aText.
+ 	window model acceptAction: anAction.
+ 	^window.!
- 	| window holder text |
- 	holder := Workspace  new.
- 	holder contents: aText.
- 	holder shouldStyle: false.
- 	text := PluggableTextMorphPlus 
- 		on: holder 
- 		text: #contents 
- 		accept: #acceptContents: 
- 		readSelection: nil 
- 		menu: nil.
- 	text useDefaultStyler.
- 	text acceptAction: anAction.
- 	window := SystemWindow new.
- 	labelString ifNotNil:[window setLabel: labelString].
- 	window model: holder .
- 	window addMorph: text frame: (0 at 0 extent: 1 at 1).
- 	window openInWorld.
- 	^window!




More information about the Squeak-dev mailing list