More bugs:

Clicking on World menu , save project on file gives this...

Edgar

P.S. Not feeling alone in alpha mistakes :=)

-------------- next part --------------
Error: incorrect number of arguments
29 March 2012 9:31:50 am

VM: Mac OS - a SmalltalkImage
Image: etoys5.0 [latest update: #2403]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /Users/edgar/AtlantisSqueak/imagesZip/Etoys
Trusted Dir /Users/edgar/AtlantisSqueak/imagesZip/.etoys
Untrusted Dir /Users/edgar/AtlantisSqueak/imagesZip/Etoys

Project(Object)>>error:
	Receiver: a Project(Home)
	Arguments and temporary variables: 
		aString: 	'incorrect number of arguments'
	Receiver's instance variables: 
		dependents: 	nil
		world: 	a PasteUpMorph<world>(773) [world]
		changeSet: 	a ChangeSet named Home
		transcript: 	a TranscriptStream ''
		parentProject: 	a Project(Unnamed1)
		previousProject: 	a Project(Unnamed1)
		displayDepth: 	16
		viewSize: 	126 at 87
		thumbnail: 	Form(126x87x16)
		nextProject: 	nil
		guards: 	nil
		projectParameters: 	an IdentityDictionary(#disabledGlobalFlapIDs->a Set() #local...etc...
		isolatedHead: 	false
		inForce: 	nil
		version: 	7
		urlList: 	nil
		environment: 	nil
		lastDirectory: 	UnixFileDirectory on '/Users/bert/Documents/Work/Etoys/Repo/Etoy...etc...
		lastSavedAtSeconds: 	3483196923
		projectPreferenceFlagDictionary: 	an IdentityDictionary(#enablePortraitMode->fal...etc...
		resourceManager: 	a ResourceManager

Project(Object)>>perform:withArguments:inSuperclass:
	Receiver: a Project(Home)
	Arguments and temporary variables: 
		selector: 	#acceptDetailsAndStoreProject:
		argArray: 	#()
		lookupClass: 	Project
	Receiver's instance variables: 
		dependents: 	nil
		world: 	a PasteUpMorph<world>(773) [world]
		changeSet: 	a ChangeSet named Home
		transcript: 	a TranscriptStream ''
		parentProject: 	a Project(Unnamed1)
		previousProject: 	a Project(Unnamed1)
		displayDepth: 	16
		viewSize: 	126 at 87
		thumbnail: 	Form(126x87x16)
		nextProject: 	nil
		guards: 	nil
		projectParameters: 	an IdentityDictionary(#disabledGlobalFlapIDs->a Set() #local...etc...
		isolatedHead: 	false
		inForce: 	nil
		version: 	7
		urlList: 	nil
		environment: 	nil
		lastDirectory: 	UnixFileDirectory on '/Users/bert/Documents/Work/Etoys/Repo/Etoy...etc...
		lastSavedAtSeconds: 	3483196923
		projectPreferenceFlagDictionary: 	an IdentityDictionary(#enablePortraitMode->fal...etc...
		resourceManager: 	a ResourceManager

Project(Object)>>perform:withArguments:
	Receiver: a Project(Home)
	Arguments and temporary variables: 
		selector: 	#acceptDetailsAndStoreProject:
		argArray: 	#()
	Receiver's instance variables: 
		dependents: 	nil
		world: 	a PasteUpMorph<world>(773) [world]
		changeSet: 	a ChangeSet named Home
		transcript: 	a TranscriptStream ''
		parentProject: 	a Project(Unnamed1)
		previousProject: 	a Project(Unnamed1)
		displayDepth: 	16
		viewSize: 	126 at 87
		thumbnail: 	Form(126x87x16)
		nextProject: 	nil
		guards: 	nil
		projectParameters: 	an IdentityDictionary(#disabledGlobalFlapIDs->a Set() #local...etc...
		isolatedHead: 	false
		inForce: 	nil
		version: 	7
		urlList: 	nil
		environment: 	nil
		lastDirectory: 	UnixFileDirectory on '/Users/bert/Documents/Work/Etoys/Repo/Etoy...etc...
		lastSavedAtSeconds: 	3483196923
		projectPreferenceFlagDictionary: 	an IdentityDictionary(#enablePortraitMode->fal...etc...
		resourceManager: 	a ResourceManager

MessageSend>>value
	Receiver: MessageSend(#acceptDetailsAndStoreProject: -> a Project(Home))
	Arguments and temporary variables: 

	Receiver's instance variables: 
		receiver: 	a Project(Home)
		selector: 	#acceptDetailsAndStoreProject:
		arguments: 	#()


--- The full stack ---
Project(Object)>>error:
Project(Object)>>perform:withArguments:inSuperclass:
Project(Object)>>perform:withArguments:
MessageSend>>value
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Project>>validateProjectNameIfOK:
Project>>storeOnServer
Project>>saveAs
PasteUpMorph>>saveOnFile
TheWorldMenu>>doMenuItem:with:
[] in MenuItemMorph>>invokeWithEvent: {[(selArgCount := selector numArgs) = 0   ifTrue: [target perform: selector] ...]}
BlockContext>>ensure:
CursorWithAlpha(Cursor)>>showWhile:
MenuItemMorph>>invokeWithEvent:
MenuItemMorph>>mouseUp:
MenuItemMorph>>handleMouseUp:
MouseButtonEvent>>sentTo:
MenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
...etc...