It's almost time for me to do Eater things. I have to turn away from this for a bit. I thought I'd have something concrete to show two days ago. Exploring somebody else's model is ... like opening one more door forever. 

http://box4.squeak.org:9971/seaside/smserver/
http://box4.squeak.org:9971/seaside/smserver/loadgz/
http://box4.squeak.org:9971/seaside/smserver/accountbyid/a22b00b1-ab1b-4af8-b9bf-3c4f1825c30b/files/smserver.st

You can click those to see progress. They don't work with the client well yet. The last one is the Installer script for the SMServer so far. And you can build your own model from scratch.[1] 


Happy Easter, 
Chris 

http://www.youtube.com/watch?v=xNnAvTTaJjM


[1]

	SMSqueakMap clear 	
	SMSqueakMap default
	
	map := (SMSqueakMap default).

	account := (SMSqueakMap default) newAccount: 'heisenberg' username: 'heisenberg' email: 'heisenberg at bluemeth.com'.


	map objects: Dictionary new.
	map addObject: account
	map accountsByName 
	map cache

	account directory
	account entries
	account uploadsDirectory
	account files

	package := (SMPackage newIn: map) 
						name: 'SMServer';
						summary: 'none';
						description: 'none';
						url: 'http://www.bluemeth.com';
						author: 'heisenberg'.
			
	account addObject: package		
			
	map addObject: package

	map packages

	map accounts

	rel := SMPackageRelease newFromRelease: nil package: package.

	relreturn := rel	
			version: '1';
			note: 'I love meth';
			downloadUrl: 'http://box4.squeak.org:9971/seaside/smserver/accountbyid/de44d272-6c5a-4736-8178-f885d7a195ad/files/smserver.st';
			name: 'Blue Meth';
			summary: 'Special blue meth'.
	
	package addRelease: relreturn
	
	map createCheckpointNumber: 7006.
	
	WAKom startOn: 9971
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20140419/dcf13ef3/attachment.htm