[Pkg] The Trunk: SMBase-cmm.121.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat Feb 12 22:47:48 UTC 2011
Chris Muller uploaded a new version of SMBase to project The Trunk:
http://source.squeak.org/trunk/SMBase-cmm.121.mcz
==================== Summary ====================
Name: SMBase-cmm.121
Author: cmm
Time: 9 February 2011, 1:59:24.04 pm
UUID: 403f652a-b033-4ed2-9533-24b81eeee6f7
Ancestors: SMBase-cmm.120
Don't consider unpublished packages "unsafe" to install.
=============== Diff against SMBase-cmm.120 ===============
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 Packages
mailing list