The Trunk: Morphic-mt.877.mcz

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

The Trunk: Morphic-mt.877.mcz

commits-2
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@1000; fullBounds; "give text a chance to layout good"
+ width: 250; fullBounds;
+ height: (resultsWidget extentToFit y min: 300);
- extent: 250@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].!