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 at 2 corner: 0 at 0))
- 			at: self innerBounds topLeft + (5 at 2)
  			font: textMorph textStyle defaultFont
  			color: (Color gray: 0.7)].!