[squeak-dev] The Trunk: SMBase-cmm.116.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Feb 12 22:46:48 UTC 2011


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

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

Name: SMBase-cmm.116
Author: cmm
Time: 4 February 2011, 3:44:47.026 pm
UUID: fbcef7d4-fe1f-4b7b-9d3d-e1261b69175a
Ancestors: SMBase-cmm.113, SMBase-cmm.115

Moved a method.

=============== Diff against SMBase-cmm.113 ===============

Item was changed:
  ----- Method: SMFileCache>>includes: (in category 'services') -----
+ includes: anSMObject 
- includes: anSMObject
  	"Check if the cache holds the file for the object."
+ 	^ anSMObject downloadFileName notNil and: [ anSMObject cacheDirectory fileExists: anSMObject downloadFileName ]!
- 	
- 	^(anSMObject cacheDirectory)
- 		fileExists: anSMObject downloadFileName!

Item was added:
+ ----- Method: SMObject>>asString (in category 'accessing') -----
+ asString
+ 	^ self name!

Item was removed:
- ----- Method: SMObject>>created: (in category 'accessing') -----
- created: c
- 	created := c!

Item was removed:
- ----- Method: SMObject>>updated: (in category 'accessing') -----
- updated: c
- 	updated := c!

Item was changed:
  ----- Method: SMPackage>>addRelease: (in category 'private') -----
+ addRelease: aSMPackageRelease 
- addRelease: aRelease
  	"Add the release. Make sure package is set."
+ 	(releases includes: aSMPackageRelease) ifFalse: [ releases add: aSMPackageRelease ].
+ 	aSMPackageRelease package: self.
+ 	^ aSMPackageRelease!
- 
- 	releases add: aRelease.
- 	aRelease package: self.
- 	^aRelease!

Item was changed:
  ----- Method: SMPackageRelease>>downloadUrl: (in category 'accessing') -----
+ downloadUrl: urlString
+ 	downloadUrl := urlString!
- downloadUrl: anObject
- 	^downloadUrl := anObject!

Item was changed:
  ----- Method: SMPackageRelease>>note: (in category 'accessing') -----
+ note: aString
+ 	note := aString!
- note: anObject
- 	^note := anObject!

Item was changed:
  ----- Method: SMPackageRelease>>version: (in category 'accessing') -----
+ version: aString 
+ 	version := aString!
- version: anObject
- 	^version := anObject!




More information about the Squeak-dev mailing list