The Trunk: ToolBuilder-Morphic-ar.56.mcz

Andreas Raab uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-ar.56.mcz

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

Name: ToolBuilder-Morphic-ar.56
Author: ar
Time: 9 April 2010, 9:42:50.883 pm
UUID: 645bc8d6-6e1a-8046-9fbf-e4f9c692f2c4
Ancestors: ToolBuilder-Morphic-ar.55

Do not hardcode the color for Workspaces from UIManager; they need to adhere to the window color policy in use.

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

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 holder text |
  holder := Workspace  new.
  holder contents: aText.
  text := PluggableTextMorphPlus
  on: holder
  text: #contents
  accept: #acceptContents:
  readSelection: nil
  menu: nil.
  text acceptAction: anAction.
  window := SystemWindow new.
  labelString ifNotNil:[window setLabel: labelString].
  window model: holder .
  window addMorph: text frame: (0@0 extent: 1@1).
- window paneColor: Color gray.
  window openInWorld.
+ ^window!
-
- ^ window !