[Pkg] The Trunk: Morphic-mt.877.mcz

[commits at source.squeak.org]

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

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

Name: Morphic-mt.877
Author: mt
Time: 15 April 2015, 5:15:35.052 pm
UUID: f405eb92-2d69-5d4c-a998-ed2872044ef6
Ancestors: Morphic-mt.876

Improved layout of print-It box in search bar.

=============== Diff against Morphic-mt.876 ===============

Item was changed:
  ----- Method: SearchBar>>printIt:result: (in category 'do-its') -----
  printIt: code result: object
  
  	| focusedWidget |
  	focusedWidget := self currentHand keyboardFocus.
  
  	self removeResultsWidget.
  	
  	ToolBuilder default in: [:builder |
  		resultsWidget := (builder build: (StringHolder new
  			contents: object asString;
  			buildCodePaneWith: builder)).
+ 		"This might cause the widget disappear to early. Especially if the textMorph is to small but the container needs to maintain a larger size because of its scroll bars."
  		resultsWidget textMorph
  			on: #mouseLeave send: #delete to: resultsWidget.
  		resultsWidget
+ 			extent: 1000 at 1000; fullBounds; "give text a chance to layout good"
+ 			width: 250; fullBounds;
+ 			height: (resultsWidget extentToFit y min: 300);
- 			extent: 250 at 150;
- 			fullBounds;
- 			height: (resultsWidget textMorph height min: 300);
  			position: (focusedWidget
  				ifNotNil: [:w | w owner boundsInWorld bottomLeft]
  				ifNil: [self currentHand position]);
  			color: (BalloonMorph balloonColor alpha: 1.0).
  			
  		Preferences menuAppearance3d
  			ifTrue: [resultsWidget addDropShadow].
  			
  		resultsWidget openInWorld].!