'From etoys3.0 of 24 February 2008 [latest update: #2111] on 28 August 2008 at 3:52:13 pm'! "Change Set: pangoWidth-yo Date: 28 August 2008 Author: Yoshiki Ohshima UpdatingString overwrote #fitContents wrongly."! !UpdatingStringMorph methodsFor: 'accessing' stamp: 'yo 8/28/2008 15:50'! fitContents | newExtent | newExtent := self measureContents. newExtent := ((newExtent x max: self minimumWidth) min: self maximumWidth) @ newExtent y. (self extent = newExtent) ifFalse: [self extent: newExtent. self changed] ! !