[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
|