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

commits at source.squeak.org commits at source.squeak.org
Sat Feb 12 22:47:59 UTC 2011


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

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

Name: SMBase-cmm.122
Author: cmm
Time: 9 February 2011, 2:19:10.366 pm
UUID: 923ec73a-9fca-4579-8319-21979b77e9a4
Ancestors: SMBase-cmm.113

Don't consider unpublished packages "unsafe" to install.

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

Item was changed:
  ----- Method: SMPackage>>isSafeToInstall (in category 'testing') -----
  isSafeToInstall
  	"Answer if I am NOT installed and there also is a
  	published version for this version of Squeak available."
+ 	^ self isInstalled not
+ 		and: [self lastReleaseForCurrentSystemVersion notNil]!
- 
- 	^self isInstalled not and: [
- 		self lastPublishedReleaseForCurrentSystemVersion notNil]!

Item was added:
+ ----- Method: SMPackage>>lastReleaseForCurrentSystemVersion (in category 'services') -----
+ lastReleaseForCurrentSystemVersion
+ 	"Return the latest published release marked
+ 	as compatible with the current SystemVersion."
+ 	^ releases isEmpty
+ 		ifFalse: [releases reversed
+ 				detect: [:r | r isCompatibleWithCurrentSystemVersion]
+ 				ifNone: []]!

Item was changed:
  ----- Method: SMPackage>>smartVersion (in category 'services') -----
  smartVersion
+ 	"Delegate to last release for this SystemVersion."
- 	"Delegate to last published release for this SystemVersion."
- 
  	| r |
+ 	r := self lastReleaseForCurrentSystemVersion.
- 	r := self lastPublishedReleaseForCurrentSystemVersion.
  	^r ifNotNil: [r smartVersion] ifNil: ['']!




More information about the Squeak-dev mailing list