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-...
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@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-...'; name: 'Blue Meth'; summary: 'Special blue meth'. package addRelease: relreturn map createCheckpointNumber: 7006. WAKom startOn: 9971