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

commits at source.squeak.org commits at source.squeak.org
Mon Feb 1 09:23:58 UTC 2016


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

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

Name: Morphic-mt.1070
Author: mt
Time: 1 February 2016, 10:22:48.528285 am
UUID: 820409c5-06df-43bb-aae0-ee27057ead43
Ancestors: Morphic-tpr.1069

Fixes bounds issue regarding refreshed items in object explorer and other tree applications. Thanks to Karl Ramberg for the idea.

=============== Diff against Morphic-tpr.1069 ===============

Item was changed:
  ----- Method: IndentingListItemMorph>>refresh (in category 'initialization') -----
  refresh
  
  	self contents: self getLabel.
  	icon := self getIcon.
+ 	self width: container preferredSubmorphWidth.
  	
  	(self valueOfProperty: #wasRefreshed ifAbsent: [false]) ifFalse: [
  		self setProperty: #wasRefreshed toValue: true.
  		self color: Color yellow. "Indicate refresh operation."].!

Item was changed:
  ----- Method: SimpleHierarchicalListMorph>>adjustSubmorphPositions (in category 'private') -----
  adjustSubmorphPositions
  
  	| p |
  	p := 0 at 0.
  	scroller submorphsDo: [ :each | | h |
  		each visible ifTrue: [
  			h := each height.
+ 			each privateBounds: (p extent: self preferredSubmorphWidth at h).
- 			each privateBounds: (p extent: 9999 at h).
  			p := p + (0 at h) ]].
  	self 
  		changed;
  		layoutChanged;
  		setScrollDeltas.
  !

Item was added:
+ ----- Method: SimpleHierarchicalListMorph>>preferredSubmorphWidth (in category 'private') -----
+ preferredSubmorphWidth
+ 
+ 	^ 9999!



More information about the Packages mailing list