[etoys-dev] Etoys: Etoys-kfr.133.mcz

commits at source.squeak.org commits at source.squeak.org
Sun Mar 18 16:18:29 EDT 2012


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

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

Name: Etoys-kfr.133
Author: kfr
Time: 18 March 2012, 9:17:01 pm
UUID: 2a04e00c-9fc3-6949-a18b-1876ee87f994
Ancestors: Etoys-kfr.132

The labels on certain "detailed watchers" -- those for which the variable-name and the "getter selector" do not bear the default relationship -- are wrong.  
SQ-1052

=============== Diff against Etoys-kfr.132 ===============

Item was changed:
  ----- Method: WatcherWrapper>>buildForPlayer:getter: (in category 'initialization') -----
  buildForPlayer: aPlayer getter: aGetter 
  	"Build up basic structure"
+ 
+ 	| aColor interface |
+ 	interface := Vocabulary eToyVocabulary methodInterfaceAt: aGetter ifAbsent: [nil].
+ 	variableName := interface
+ 		ifNotNil: [interface wording]
+ 		ifNil: [Utilities inherentSelectorForGetter: aGetter].
- 	| aColor aMethodInterface interface |
- 	interface := ScriptingSystem currentVocabulary methodInterfaceAt: aGetter ifAbsent: [ nil ].
- 	interface ifNotNil:[aMethodInterface := interface wording]
- 						ifNil:[ aMethodInterface :=Utilities inherentSelectorForGetter: aGetter].
  	self
  		player: aPlayer
+ 		variableName: variableName.
- 		variableName: aMethodInterface.
  	aColor := self detailedWatcherColor.
  	self listDirection: #leftToRight;
  		 hResizing: #shrinkWrap;
  		 vResizing: #shrinkWrap;
  		 color: aColor;
  		 layoutInset: -1;
  		 borderWidth: 1;
  		 borderColor: aColor darker;
  		 listCentering: #center.
  	self
  		addMorphBack: (self buildReadout: aGetter)!



More information about the etoys-dev mailing list