[Packages] Packages: Packages-Core-kph.34.mcz
squeaksource-noreply at iam.unibe.ch
squeaksource-noreply at iam.unibe.ch
Fri May 16 00:27:20 UTC 2008
A new version of Packages-Core was added to project Packages:
http://www.squeaksource.com/Packages/Packages-Core-kph.34.mcz
==================== Summary ====================
Name: Packages-Core-kph.34
Author: kph
Time: 16 May 2008, 1:27:12 am
UUID: d47f5c1b-0f34-4074-8b83-1670ac76cfef
Ancestors: Packages-Core-kph.33
finalized simplest api
=============== Diff against Packages-Core-kph.33 ===============
Item was changed:
----- Method: Packages class>>unload: (in category 'public') -----
unload: aNameOrList
+ aNameOrList isString ifTrue: [ ^ (self providedAt: aNameOrList) unload run].
- aNameOrList isString ifTrue: [ ^ (self providedAt: aNameOrList) unload ].
+ ^ (aNameOrList collect: [ :ea | (self providedAt: aNameOrList) unload ]) asTask run
- ^ (aNameOrList collect: [ :ea | (self providedAt: aNameOrList) unload ]) asTask
!
Item was changed:
----- Method: Packages class>>load: (in category 'public') -----
load: aNameOrList
+ ^ (self named: aNameOrList) run!
- ^ self named: aNameOrList!
Item was added:
+ ----- Method: Packages class>>beta (in category 'public') -----
+ beta
+
+ ^ Smalltalk classNamed: (('Packages' , SystemVersion current majorMinorVersion asLegalSelector capitalized), 'beta') asSymbol!
Item was changed:
SakeTask subclass: #Packages
instanceVariableNames: 'unloadBlock unloadPriors provides name version'
classVariableNames: 'Provided'
poolDictionaries: ''
category: 'Packages-Core'!
Packages class
instanceVariableNames: 'lastUpdate theUUniverse'!
+ !Packages commentStamp: 'kph 5/16/2008 01:26' prior: 0!
- !Packages commentStamp: 'kph 4/23/2008 22:56' prior: 0!
To generate all of the methods based upon universes definitions:
Packages taskGenerateAllUniverses run.
or
Packages taskGenerateAll run.
Sake/Packages usage:
Public API
============
"load package definition for your current version of Squeak"
+ Packages current load: 'Seaside'.
+ Packages beta named: 'Seaside'.
+
+ or
+
+ (Packages current named: 'Seaside') run. " or runQuietly, runStepping, runLogging"
+ (Packages beta named: 'Seaside') run.
- (Packages current load: 'Seaside') run. " or runQuietly, runStepping, runLogging"
- (Packages currentBeta load: 'Seaside') run.
multiples:
+ Packages current load: #('Seaside' 'Magma' 'Logging')
- (Packages current load: #('Seaside' 'Magma' 'Logging') ) run.
Run-variants
=========
#runStepping , - presents a confirm/debug dialog before each action.
#run - default.
#runQuietly - auto-confirms any SakeConfirm dialogs.
#runLogging - Writes any SakeStop warnings to self log.
Unloading
========
Unloading comes in two variants.
Each package task loaded by Sake/Packages is remembered in the 'provided' list
If you perform:
+ Packages unload: 'Seaside' .
+
+ Packages unloadStepping: 'Seaside' .
- (Packages unload: 'Seaside') runStepping.
Then the 'historical' unload scripts are used, as defined when the original load tasks were run.
If instead you perform:
(Packages current named: 'Seaside') unload runStepping.
Then the most recently defined unload script will be run.
Note: If packages such as "Magma server" and "Magma client" provides "Magma", then
+ (ackages unload: 'Magma'.
- (Packages unload: 'Magma') run.
Will unload whichever of the two are loaded.
===
Misc notes...
Universes are using 'instance side' task definition, so the task extensions mechanism does not work in this context.
!
Item was added:
+ ----- Method: Packages class>>unloadStepping: (in category 'public') -----
+ unloadStepping: aNameOrList
+
+ aNameOrList isString ifTrue: [ ^ (self providedAt: aNameOrList) unload runStepping].
+
+ ^ (aNameOrList collect: [ :ea | (self providedAt: aNameOrList) unload ]) asTask runStepping
+ !
Item was removed:
- ----- Method: Packages class>>currentBeta (in category 'public') -----
- currentBeta
-
- ^ Smalltalk classNamed: (('Packages' , SystemVersion current majorMinorVersion asLegalSelector capitalized), 'beta') asSymbol!
More information about the Packages
mailing list