[etoys-dev] Etoys: Etoys-Richo.11.mcz

[commits at source.squeak.org]

Ricardo Moran uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-Richo.11.mcz

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

Name: Etoys-Richo.11
Author: Richo
Time: 23 May 2010, 5:51:48 pm
UUID: 1d2477ad-1e0d-454b-aeba-bdb98135a4b3
Ancestors: Etoys-Richo.10

* Textual scripts wasn't working because CompiledMethod>>#decompileString is broken for some cases (I don't know why). Now #decompileString is still broken but textual scripts work.

=============== Diff against Etoys-Richo.10 ===============

Item was changed:
  ----- Method: UniclassScript>>becomeTextuallyCoded (in category 'textually coded') -----
  becomeTextuallyCoded
  	"Transform the receiver into one which is textually coded"
  
  	isTextuallyCoded _ true.
+ 	lastSourceString _ (playerClass sourceCodeAt: selector)  		"Save this to compare when going back to tiles"!
- 	lastSourceString _ (playerClass compiledMethodAt: selector) decompileString 		"Save this to compare when going back to tiles"!

Item was changed:
  ----- Method: ScriptEditorMorph>>toggleWhetherShowingTiles (in category 'other') -----
  toggleWhetherShowingTiles
  	"Toggle between showing the method pane and showing the tiles pane"
  
  	self showingMethodPane
  		ifFalse:				"currently showing tiles"
  			[self showSourceInScriptor]
  
  		ifTrue:				"current showing textual source"
  			[Preferences universalTiles
  				ifTrue: [^ self revertToTileVersion].
  			self savedTileVersionsCount >= 1
  				ifTrue:
+ 					[(self userScriptObject lastSourceString = (playerScripted class sourceCodeAt: scriptName))
- 					[(self userScriptObject lastSourceString = (playerScripted class compiledMethodAt: scriptName) decompileString)
  						ifFalse:
  							[(self confirm: 
  'Caution -- this script was changed
  textually; if you revert to tiles at this
  point you will lose all the changes you
  may have made textually.  Do you
  really want to do this?' translated) ifFalse: [^ self]].
  					self revertToTileVersion]
  				ifFalse:
  					[Beeper beep]]!