Chris Muller uploaded a new version of SMLoader to project The Trunk:
http://source.squeak.org/trunk/SMLoader-cmm.70.mcz

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

Name: SMLoader-cmm.70
Author: cmm
Time: 9 February 2011, 2:11:57.68 pm
UUID: 98d6dccd-c7cc-4914-9c36-f9d2ae71818d
Ancestors: SMLoader-cmm.69

- Changed install script name to 'install-'[PackageName]-[Version].st.
- Clean-up the temporary script file after uploading.
- Warn if the script already exists.

=============== Diff against SMLoader-cmm.69 ===============

Item was changed:
  ----- Method: SMPackageRelease>>scriptName (in category '*smloader') -----
  scriptName
+ 	^ 'install-', self package name, '-', self version, '.st'!
- 	^ 'install-', self id asString, '.st'!

Item was changed:
  ----- Method: SMReleaseBrowser>>writeInstallFile (in category 'private') -----
  writeInstallFile
+ 	(FileDirectory default fileExists: release scriptName)
+ 		ifTrue: [Warning signal: release scriptName , ' already exists and will be deleted.'].
  	FileDirectory default deleteFileNamed: release scriptName.
  	FileStream
  		fileNamed: release scriptName
+ 		do: [:stream | stream nextPutAll: self loadScript asString].
+ 	FileDirectory default deleteFileNamed: release scriptName!
- 		do:
- 			[ : stream | stream nextPutAll: self loadScript asString ]!