Etoys: MorphicExtras-kfr.24.mcz

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

Etoys: MorphicExtras-kfr.24.mcz

commits-2
Karl Ramberg uploaded a new version of MorphicExtras to project Etoys:
http://source.squeak.org/etoys/MorphicExtras-kfr.24.mcz

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

Name: MorphicExtras-kfr.24
Author: kfr
Time: 22 May 2011, 5:47:20 pm
UUID: 92ab7a8a-2334-b940-a073-24a08fee6fc1
Ancestors: MorphicExtras-kfr.23

Playfield's menu item: "set thumbnail height" does not take effect until you uncheck and re-check "use thumbnails
http://tracker.squeakland.org/browse/SQ-814

=============== Diff against MorphicExtras-kfr.22 ===============

Item was changed:
  ----- Method: MorphThumbnail>>representativeNoTallerThan:norWiderThan:thumbnailHeight: (in category 'thumbnail') -----
  representativeNoTallerThan: maxHeight norWiderThan: maxWidth thumbnailHeight: thumbnailHeight
 
  "Return a morph representing the receiver but which is no taller than aHeight.  If the receiver is already small enough, just return it, else return a MorphThumbnail companioned to the receiver, enforcing the maxWidth"
 
+ "(self height <= maxHeight and: [self width <= maxWidth]) ifTrue: [^ self]."
- (self height <= maxHeight and: [self width <= maxWidth]) ifTrue: [^ self].
 
  ^ MorphThumbnail new
+ extent: maxWidth @ (thumbnailHeight "min: self height");
- extent: maxWidth @ (thumbnailHeight min: self height);
  morphRepresented: morphRepresented!

_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev