The Trunk: ToolBuilder-Morphic-mt.107.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: ToolBuilder-Morphic-mt.107.mcz

commits-2
Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.107.mcz

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

Name: ToolBuilder-Morphic-mt.107
Author: mt
Time: 30 March 2015, 11:05:54.366 am
UUID: 6b98b55a-8662-944b-baab-7166bf663019
Ancestors: ToolBuilder-Morphic-mt.106

Fix drawing of balloonText in text fields to consider the actual bounds.

=============== Diff against ToolBuilder-Morphic-mt.106 ===============

Item was changed:
  ----- Method: PluggableTextMorphPlus>>drawBalloonTextOn: (in category 'drawing') -----
  drawBalloonTextOn: aCanvas
  "Show balloon text in the text morph if it has no contents."
 
  textMorph contents ifNotEmpty: [^ self].
 
  self balloonText ifNotNil: [:text |
  aCanvas
  drawString: text
+ in: (self innerBounds insetBy: (5@2 corner: 0@0))
- at: self innerBounds topLeft + (5@2)
  font: textMorph textStyle defaultFont
  color: (Color gray: 0.7)].!