[squeak-dev] The Trunk: EToys-tfel.236.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Sep 20 10:54:24 UTC 2016


Tim Felgentreff uploaded a new version of EToys to project The Trunk:
http://source.squeak.org/trunk/EToys-tfel.236.mcz

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

Name: EToys-tfel.236
Author: tfel
Time: 20 September 2016, 12:53:18.013404 pm
UUID: 4e58e94c-ad35-324e-8af8-0f0426cb9d10
Ancestors: EToys-tfel.235

- move forgotten method from OLPC-Display package into Etoys
- until we have a final solution for project saving, install SISS into releases for squeakland

=============== Diff against EToys-tfel.235 ===============

Item was added:
+ ----- Method: Form>>isVirtualScreen (in category '*Etoys-OLPC-Display') -----
+ isVirtualScreen
+ 	"Am I a virtual display screen?"
+ 	^false!

Item was added:
+ ----- Method: ReleaseBuilderSqueakland class>>installExtraPackages (in category 'preparing') -----
+ installExtraPackages
+ 
+ 	#('Meta-Implementation' 'Meta-Examples' 'SISS') do: [:pkg |
+ 		Installer swasource project: 'etoys-spur'; install: pkg].!

Item was changed:
  ----- Method: ReleaseBuilderSqueakland class>>prepareEnvironment (in category 'preparing') -----
  prepareEnvironment
  	| directory entries projectNames |
  	super prepareEnvironment.
  	projectNames := #('Gallery' 'Tutorials' 'Home').
  	directory := FileDirectory on: Smalltalk imagePath.
  	entries := FileList2 projectOnlySelectionMethod: directory entries.
  	projectNames
  		do: [:projectName | (entries
  					anySatisfy: [:each | (Project parseProjectFileName: each first) first = projectName])
  				ifFalse: [self inform: projectName , ' is not found']].
+ 	self installExtraPackages.
  	DeferredTask := [ProjectLoading openFromImagePath: 'Home'].!



More information about the Squeak-dev mailing list