[etoys-dev] Etoys: Etoys-bf.41.mcz

[commits at source.squeak.org]

Bert Freudenberg uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-bf.41.mcz

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

Name: Etoys-bf.41
Author: bf
Time: 28 August 2010, 3:22:55 pm
UUID: 84652135-8798-4929-8efb-060907917923
Ancestors: Etoys-bf.40

Fix SQ-660: Changing variable type to "Patch" throws "Message Not Understood" error

=============== Diff against Etoys-bf.40 ===============

Item was changed:
  ----- Method: KedamaPatchType>>updatingTileForTarget:partName:getter:setter: (in category 'tile protocol') -----
  updatingTileForTarget: aTarget partName: partName getter: getter setter: setter
  
  	| aTile displayer actualSetter |
  	actualSetter _ setter ifNotNil:
  		[(#(none nil unused) includes: setter) ifTrue: [nil] ifFalse: [setter]].
  
  	aTile _ self newReadoutTile.
  
  	displayer _ UpdatingStringMorph new
  		getSelector: #externalName;
+ 		target: aTarget costume renderedMorph;
- 		target: (aTarget perform: getter) costume renderedMorph;
  		growable: true;
  		minimumWidth: 24;
  		putSelector: nil.
  	displayer stepTime: 1000.
  	"Note that when typeSymbol = #number, the #target: call above will have dealt with floatPrecision details"
  
  	self setFormatForDisplayer: displayer.
  	aTile addMorphBack: displayer.
  	(actualSetter notNil and: [self wantsArrowsOnTiles]) ifTrue: [aTile addArrows].	
  	getter numArgs == 0 ifTrue:
  		[aTile setLiteralInitially: (aTarget perform: getter)].
  	displayer useStringFormat.
  
  	^ aTile
  !