'From etoys4.0 of 9 October 2008 [latest update: #2332] on 11 October 2009 at 11:07:26 pm'! "Change Set: storeOnServerFix-mu Date: 11 October 2009 Author: Masashi Umezawa Project>>storeOnServerShowProgressOn:forgetURL: will raise DNU because MessageSend argument is not set properly. The patch adds projectDetails argument. "! !Project methodsFor: 'file in/out' stamp: 'mu 10/11/2009 23:01'! storeOnServerShowProgressOn: aMorphOrNil forgetURL: forget "Save to disk as an Export Segment. Then put that file on the server I came from, as a new version. Version is literal piece of file name. Mime encoded and http encoded." | aMessageSend details | world setProperty: #optimumExtentFromAuthor toValue: world extent. world setProperty: #forgetURL toValue: forget. details := world valueOfProperty: #ProjectDetails. aMessageSend := MessageSend receiver: self selector: #acceptDetailsAndStoreProjectWithForget: argument: details. self validateProjectNameIfOK: aMessageSend! !