Packages August 2008

packages@lists.squeakfoundation.org

4 participants
40 discussions

Monticello Public: PackageInfo-Base-kph.50.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of PackageInfo-Base was added to project Monticello Public: http://www.squeaksource.com/mc/PackageInfo-Base-kph.50.mcz ==================== Summary ==================== Name: PackageInfo-Base-kph.50 Author: kph Time: 3 August 2008, 5:05:54 am UUID: 07da6a49-7423-4c00-982b-760191ab213b Ancestors: PackageInfo-Base-mtf.49 Latest PackageInfo supporting big changes in Monticello.impl-kph.562 =============== Diff against PackageInfo-Base-mtf.49 =============== Item was changed: ----- Method: PackageInfo class>>named: (in category 'packages access') ----- named: aString + ^ PackageOrganizer default packageNamed: aString ifAbsent: [(self newForName: aString) register]! Item was added: + ----- Method: PackageInfo>>propertyAt:ifAbsentPut: (in category 'preamble/postscript') ----- + propertyAt: key ifAbsentPut: valBlock + + properties ifNil:[ ^ self propertyAt: key put: valBlock ]. + + ^ properties at: key ifAbsent: [ self propertyAt: key put: valBlock ]! Item was added: + ----- Method: PackageInfo>>postscriptDefault (in category 'preamble/postscript') ----- + postscriptDefault + + ^ StringHolder new contents: '"below, add code to be run after the loading of this package"' + ! Item was changed: Object subclass: #PackageInfo + instanceVariableNames: 'packageName methodCategoryPrefix properties' - instanceVariableNames: 'packageName methodCategoryPrefix preamble postscript preambleOfRemoval postscriptOfRemoval' classVariableNames: '' poolDictionaries: '' category: 'PackageInfo-Base'! PackageInfo class instanceVariableNames: 'default'! !PackageInfo commentStamp: 'kph 6/2/2008 23:37' prior: 0! Subclass this class to create new Packages. ! Item was added: + ----- Method: PackageInfo>>preambleDefault (in category 'preamble/postscript') ----- + preambleDefault + + ^ StringHolder new contents: '"below, add code to be run before the loading of this package"' + ! Item was added: + ----- Method: PackageInfo>>propertyAt:put: (in category 'preamble/postscript') ----- + propertyAt: key put: value + + properties ifNil:[ properties := IdentityDictionary new ]. + + ^ properties at: key put: value! Item was added: + ----- Method: PackageInfo>>propertyOrDefaultAt: (in category 'preamble/postscript') ----- + propertyOrDefaultAt: key + + | defaultSelector value | + + (self propertyAt: key) ifNotNilDo: [ :v | ^ v ]. + + defaultSelector := (key, 'Default') asSymbol. + + value := (self respondsTo: defaultSelector) ifTrue: [ self perform: defaultSelector ] ifFalse: [ ^ nil ]. + + ^ self propertyAt: key put: value + + ! Item was added: + ----- Method: PackageInfo>>preambleOfRemovalDefault (in category 'preamble/postscript') ----- + preambleOfRemovalDefault + + ^ StringHolder new contents: '"below, add code to prepare for the unloading of this package"'! Item was added: + ----- Method: PackageInfo>>propertyAt: (in category 'preamble/postscript') ----- + propertyAt: key + + properties ifNil:[ ^ nil ]. + + ^ properties at: key ifAbsent: [ nil ]! Item was added: + ----- Method: PackageInfo>>printOn: (in category 'listing') ----- + printOn: str + super printOn: str. + str nextPut: $(; nextPutAll: self packageName; nextPut: $)! Item was added: + ----- Method: PackageInfo>>postscriptOfRemovalDefault (in category 'preamble/postscript') ----- + postscriptOfRemovalDefault + + ^ StringHolder new contents:'"below, add code to clean up after the unloading of this package"' + ! Item was removed: - ----- Method: PackageInfo>>preamble: (in category 'preamble/postscript') ----- - preamble:aString - - preamble := StringHolder new contents: aString! Item was removed: - ----- Method: PackageInfo>>preambleOfRemoval: (in category 'preamble/postscript') ----- - preambleOfRemoval: aString - - preambleOfRemoval := StringHolder new contents: aString - ! Item was removed: - ----- Method: PackageInfo>>preambleOfRemoval (in category 'preamble/postscript') ----- - preambleOfRemoval - - ^ preambleOfRemoval ifNil: [preambleOfRemoval := StringHolder new contents: '"below, add code to prepare for the unloading of this package"']! Item was removed: - ----- Method: PackageInfo>>hasPreamble (in category 'preamble/postscript') ----- - hasPreamble - ^ preamble notNil! Item was removed: - ----- Method: PackageInfo>>hasPreambleOfRemoval (in category 'preamble/postscript') ----- - hasPreambleOfRemoval - - ^ preambleOfRemoval notNil! Item was removed: - ----- Method: PackageInfo>>postscriptOfRemoval (in category 'preamble/postscript') ----- - postscriptOfRemoval - - ^ postscriptOfRemoval ifNil: [postscriptOfRemoval := StringHolder new contents: '"below, add code to clean up after the unloading of this package"']! Item was removed: - ----- Method: PackageInfo>>hasPostscriptOfRemoval (in category 'preamble/postscript') ----- - hasPostscriptOfRemoval - - ^ postscriptOfRemoval notNil! Item was removed: - ----- Method: PackageInfo>>postscriptOfRemoval: (in category 'preamble/postscript') ----- - postscriptOfRemoval: aString - - postscriptOfRemoval := StringHolder new contents: aString - ! Item was removed: - ----- Method: PackageInfo>>hasPostscript (in category 'preamble/postscript') ----- - hasPostscript - - ^ postscript notNil! Item was removed: - ----- Method: PackageInfo>>preamble (in category 'preamble/postscript') ----- - preamble - - ^ preamble ifNil: [preamble := StringHolder new contents: '"below, add code to be run before the loading of this package"']. - ! Item was removed: - ----- Method: PackageInfo>>postscript (in category 'preamble/postscript') ----- - postscript - - ^ postscript ifNil: [postscript := StringHolder new contents: '"below, add code to be run after the loading of this package"'].! Item was removed: - ----- Method: PackageInfo>>postscript: (in category 'preamble/postscript') ----- - postscript: aString - - postscript := StringHolder new contents: aString!

1 0

Monticello Public: Monticello.impl-kph.562.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Monticello.impl was added to project Monticello Public: http://www.squeaksource.com/mc/Monticello.impl-kph.562.mcz ==================== Summary ==================== Name: Monticello.impl-kph.562 Author: kph Time: 3 August 2008, 4:52:05 am UUID: 0eb39f75-165b-498c-bb57-722e72d97100 Ancestors: Monticello.impl-mtf.561 Refactoring - - PackageInfo now has a properties dictionary for general current status use, amongst other things. - Scripts preambles etc. use this dictionary. - PackageOrganizer now manages the single master package list - MCWorkingCopy register (now retired) - MC stores its package manager for each package as a property #mc in the PackageInfo instances in the master list. (this may break things, the migration process may need some work as yet) =============== Diff against Monticello.impl-mtf.561 =============== Item was changed: ----- Method: MCWorkingCopyBrowser>>editScript: (in category 'morphic ui') ----- editScript: scriptSymbol | script | + script := workingCopy packageInfo propertyOrDefaultAt: scriptSymbol. - script := workingCopy packageInfo perform: scriptSymbol. script openLabel: scriptSymbol asString, ' of the Package ', workingCopy package name.! Item was changed: ----- Method: MCWorkingCopy class>>freeSomeSpace (in category 'as yet unclassified') ----- freeSomeSpace + " | wc | PackageOrganizer default in: [ :po | po packageNames do: [ :pName | wc := self registry at: (MCPackage named: pName) ifAbsent: nil. wc ifNotNil: [ wc ancestry size = 0 ifTrue: [ po unregisterPackageNamed: pName. wc unregister ] ] ifNil: [ po unregisterPackageNamed: pName ]. ]. + ] + "! - ]! Item was added: + ----- Method: PackageInfo>>manager: (in category '*monticello') ----- + manager: mcPackageManager + + ^ self propertyAt: #mc put: mcPackageManager! Item was changed: ----- Method: MCWorkingCopy class>>initialize (in category 'as yet unclassified') ----- initialize Smalltalk at: #MczInstaller ifPresent: [:installer | self adoptVersionInfoFrom: installer]. registry ifNotNil:[registry rehash]. "changed #=" self allInstancesDo:[:each| "moved notifications" Smalltalk at: #SystemChangeNotifier ifPresent:[:cls| cls uniqueInstance noMoreNotificationsFor: each. ]. ]. self registerForNotifications. + self registry. + ! - - ! Item was added: + ----- Method: MCPackageManager class>>packageInfos (in category 'as yet unclassified') ----- + packageInfos + ^ self organizer packageInfos! Item was changed: ----- Method: MCPackage>>snapshot (in category 'as yet unclassified') ----- snapshot + | definitions categories packageInfo | - | packageInfo definitions categories | packageInfo := self packageInfo. definitions := OrderedCollection new. categories := packageInfo systemCategories. definitions addAll: (self orphanage orphansFor: packageInfo). definitions removeAllFoundIn: self orphanage unlinkedClasses. categories isEmpty ifFalse: [ definitions add: (MCOrganizationDefinition categories: categories) ]. packageInfo methods do: [:ea | definitions add: ea asMethodDefinition] displayingProgress: 'Snapshotting methods... '. (packageInfo respondsTo: #overriddenMethods) ifTrue: [ packageInfo overriddenMethods do: [:ea | definitions add: (packageInfo changeRecordForOverriddenMethod: ea) asMethodDefinition] displayingProgress: 'Searching for overrides...']. packageInfo classes do: [:ea | definitions addAll: ea classDefinitions] displayingProgress: 'Snapshotting classes...'. + MCScriptDefinition subclassesDo: [ :ea | ea from: packageInfo addTo: definitions ]. - (packageInfo respondsTo: #hasPreamble) ifTrue: [ - packageInfo hasPreamble ifTrue: [definitions add: (MCPreambleDefinition from: packageInfo)]. - packageInfo hasPostscript ifTrue: [definitions add: (MCPostscriptDefinition from: packageInfo)]. - packageInfo hasPreambleOfRemoval ifTrue: [definitions add: (MCRemovalPreambleDefinition from: packageInfo)]. - packageInfo hasPostscriptOfRemoval ifTrue: [definitions add: (MCRemovalPostscriptDefinition from: packageInfo)]]. ^ MCSnapshot fromDefinitions: definitions ! Item was changed: ----- Method: MCPackage>>packageInfo (in category 'as yet unclassified') ----- packageInfo + ^ PackageInfo named: name ! - ^ PackageInfo named: name! Item was changed: ----- Method: MCPackageManager class>>allManagers (in category 'as yet unclassified') ----- allManagers + ^ self packageInfos collect:[ :pi | pi manager ifNil: [ self forPackage: (MCPackage named: pi name) ] ]! - ^ self registry values! Item was changed: ----- Method: MCPackageManager class>>registry (in category 'as yet unclassified') ----- registry + + "if we have a registry migrate to using PackageOrganizer" + + ^ registry ifNotNil: [ + registry values collect: [ :mgr | mgr package packageInfo manager: mgr ]. + ] + + ! - ^ registry ifNil: [registry := Dictionary new]! Item was changed: ----- Method: MCPackageManager class>>forPackage: (in category 'as yet unclassified') ----- forPackage: aPackage + + ^ (PackageInfo named: aPackage name) in: [ :pi | + + pi manager ifNil: [ pi manager: (self new initializeWithPackage: aPackage). + self changed: #allManagers. + pi manager ] + + ] ! - ^ self registry at: aPackage ifAbsent: - [|mgr| - mgr := self new initializeWithPackage: aPackage. - self registry at: aPackage put: mgr. - self changed: #allManagers. - mgr]! Item was added: + ----- Method: MCScriptDefinition class>>from:addTo: (in category 'as yet unclassified') ----- + from: aPackageInfo addTo: definitions + + (aPackageInfo respondsTo: #propertyAt:) ifFalse: [ ^ self ]. + + (aPackageInfo propertyAt: self scriptSelector) + ifNotNilDo: [ :v | definitions add: (self from: v) ]! Item was added: + ----- Method: PackageInfo>>manager (in category '*monticello') ----- + manager + + ^ self propertyAt: #mc! Item was added: + ----- Method: MCWorkingCopy class>>r (in category 'as yet unclassified') ----- + r + + ^ registry! Item was changed: ----- Method: MCPackageManager>>unregister (in category 'operations') ----- unregister + self class organizer unregisterPackageNamed: self package name. - self class registry removeKey: package. self class changed: #allManagers! Item was changed: ----- Method: MCPackage>>hasWorkingCopy (in category 'as yet unclassified') ----- hasWorkingCopy + MCWorkingCopy organizer packageNamed: self name ifAbsent: [ ^ false ]. + + ^ true! - ^ MCWorkingCopy registry includesKey: self! Item was added: + ----- Method: MCPackageManager class>>organizer (in category 'as yet unclassified') ----- + organizer + ^ PackageOrganizer default ! Item was changed: ----- Method: MCPackageManager class>>managersForCategory:do: (in category 'system changes') ----- managersForCategory: aSystemCategory do: aBlock "Got to be careful here - we might get method categories where capitalization is problematic." | cat foundOne index | foundOne := false. cat := aSystemCategory ifNil:[^nil]. "yes this happens; for example in eToy projects" "first ask PackageInfos, their package name might not match the category" + self packageInfos do: [:pi | + (pi includesSystemCategory: aSystemCategory) ifTrue: [ + aBlock value: pi manager. - self registry do: [:mgr | - (mgr packageInfo includesSystemCategory: aSystemCategory) ifTrue: [ - aBlock value: mgr. foundOne := true. ] ]. foundOne ifTrue: [^self]. ["Loop over categories until we found a matching one" + + (self organization packageNamed: cat ifAbsent: nil) ifNotNilDo:[:pi | + aBlock value: pi manager. - self registry at: (MCPackage named: cat) ifPresent:[:mgr| - aBlock value: mgr. foundOne := true. ]. + index := cat lastIndexOf: $-. index > 0]whileTrue:[ "Step up to next level package" cat := cat copyFrom: 1 to: index-1. ]. foundOne ifFalse:[ "Create a new (but only top-level)" aBlock value: (MCWorkingCopy forPackage: (MCPackage named: (aSystemCategory copyUpTo: $-) capitalized)). ].! Item was changed: ----- Method: MCScriptDefinition class>>from: (in category 'as yet unclassified') ----- from: aPackageInfo + ^ self script: (aPackageInfo propertyAt: self scriptSelector) contents asString packageName: aPackageInfo name! - ^ self script: (aPackageInfo perform: self scriptSelector) contents asString packageName: aPackageInfo name! Item was changed: ----- Method: MCPackageManager class>>managersForClass:do: (in category 'system changes') ----- managersForClass: aClass do: aBlock + self packageInfos do: [:pi | + (pi includesClass: aClass) + ifTrue: [aBlock value: pi manager]]! - self registry do: [:mgr | - (mgr packageInfo includesClass: aClass) - ifTrue: [aBlock value: mgr]]! Item was removed: Item was removed: Item was removed: - ----- Method: MCPackageManager class>>initialize (in category 'as yet unclassified') ----- - initialize - "Remove this later" - Smalltalk at: #SystemChangeNotifier ifPresent:[:cls| - (cls uniqueInstance) noMoreNotificationsFor: self. - ].!

1 0

Packages: Packages-Common-kph.23.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Packages-Common was added to project Packages: http://www.squeaksource.com/Packages/Packages-Common-kph.23.mcz ==================== Summary ==================== Name: Packages-Common-kph.23 Author: kph Time: 3 August 2008, 2:17:37 am UUID: 7e4eaec1-975c-4e86-b292-5358d56f48aa Ancestors: Packages-Common-kph.22 typo =============== Diff against Packages-Common-kph.22 =============== Item was changed: ----- Method: PackagesAllVersions>>PackagesAllVersions (in category 'Group Development') ----- PackagesAllVersions | thisVersion | + self name: 'PackagesAllVersions'. - self name: 'PacakgesAllVersions'. "version number tracks MC" self version: '1+'. info description: 'Package definitions for all versions of squeak'. info author: 'keith_hodges(a)yahoo.co.uk'. info owner: 'Keith Hodges'. self provides: #('Packages'). self dependsOn: { 'Sake' }. thisVersion := 'Packages-', (SystemVersion current majorMinorVersion copyWithout: $.). self load: [ Installer squeaksource project: 'Packages'; install: 'Packages-Core'; install: 'Packages-Common'; install: 'Packages-SqueakMap'; install: 'Packages-Squeak37'; install: 'Packages-Squeak38'; install: 'Packages-Squeak39'; install: 'Packages-Squeak310'; yourself ]. self unload: [ Installer mc unload: 'Packages-SqueakMap'. Installer mc unload: 'Packages-Squeak37'. Installer mc unload: 'Packages-Squeak38'. Installer mc unload: 'Packages-Squeak39'. Installer mc unload: 'Packages-Squeak310'. Installer mc unload: 'Packages-Common'. Installer mc unload: 'Packages-Core'. ]. !

1 0

Installer: Installer-Core-kph.217.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.217.mcz ==================== Summary ==================== Name: Installer-Core-kph.217 Author: kph Time: 3 August 2008, 1:49:53 am UUID: e9d3480b-f9ec-458c-bdfe-4bae0c70fcae Ancestors: Installer-Core-mtf.216 flush mc caches in unloadCleanUp =============== Diff against Installer-Core-mtf.216 =============== Item was changed: ----- Method: Installer>>unloadCleanUp (in category 'actions') ----- unloadCleanUp SystemOrganization removeEmptyCategories. "Until Mantis 5718 is addressed" Smalltalk at: #PackagePaneBrowser ifPresent: [ :ppbClass | ppbClass allInstancesDo: [ :ppb | ppb updatePackages ] ]. Smalltalk at: #Browser ifPresent: [ :bClass | bClass allInstancesDo: [ :b | b updateSystemCategories ] ]. + MCFileBasedRepository freeSomeSpace. SmalltalkImage current fixObsoleteReferences.! Item was changed: Object subclass: #Installer instanceVariableNames: 'sm wsm mc ma url root command markers project package bug desc answers packages messagesToSuppress pageDataStream date universe afile sake' + classVariableNames: 'WebSearchPath SkipLoadingTests Fixes Sake Entities ValidationBlock InstallerBindings Remembered LastUniUpdate IsSetToTrapErrors' - classVariableNames: 'Fixes InstallerBindings SkipLoadingTests Sake ValidationBlock Entities WebSearchPath Remembered IsSetToTrapErrors LastUniUpdate' poolDictionaries: '' category: 'Installer-Core'! !Installer commentStamp: 'kph 12/19/2007 14:42' prior: 0! Documentation now available at http://installer.pbwiki.com/Installer !

1 0

Tasks: Tasks-Common-kph.9.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Tasks-Common was added to project Tasks: http://www.squeaksource.com/Tasks/Tasks-Common-kph.9.mcz ==================== Summary ==================== Name: Tasks-Common-kph.9 Author: kph Time: 3 August 2008, 1:40:28 am UUID: 46b10eda-19bd-4e66-bfef-ace28de86dff Ancestors: Tasks-Common-kph.7 . =============== Diff against Tasks-Common-kph.7 =============== Item was changed: ----- Method: TasksRelease class>>taskEnsureFix: (in category 'as yet unclassified') ----- taskEnsureFix: aFixNumberOrString | theBugPage theBugScript | ^ self define: [ :task | task action: [ "install the fix and record its details for posterity" theBugPage := Installer mantis bug: aFixNumberOrString. theBugScript := Installer mantis bugScript: aFixNumberOrString. + self at: 'm', aFixNumberOrString asString category: nil putMethod: theBugScript doc: theBugPage. - self at: 'm', aFixNumberOrString putMethod: theBugScript doc: theBugPage. self isOnline ifTrue: [ Installer mantis ensureFix: aFixNumberOrString ] ]. ]!

1 0

Tasks: Tasks-Squeak3.10-kph.10.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Tasks-Squeak3.10 was added to project Tasks: http://www.squeaksource.com/Tasks/Tasks-Squeak3.10-kph.10.mcz ==================== Summary ==================== Name: Tasks-Squeak3.10-kph.10 Author: kph Time: 3 August 2008, 1:39:59 am UUID: d03a35f8-fd2f-4e2b-8603-a5de9283834e Ancestors: Tasks-Squeak3.10-kph.8 . =============== Diff against Tasks-Squeak3.10-kph.8 =============== Item was changed: ----- Method: TasksReleaseAfterSqueak310 class>>taskCleanExcess (in category 'as yet unclassified') ----- taskCleanExcess ^ self define: [ :task | task dependsOn: { (Packages current named: 'Universes') unload. (Packages current named: 'YAXO') unload. (Packages current named: 'SqueakMap2 loader') unload. (Packages current named: 'SqueakMap2 base') unload. }. task action: [ Installer mc unload: 'ReleaseBuilder'. Installer mc unload: 'ScriptLoader'. Installer mc unload: 'ToolBuilder-MVC'. Installer mc unload: 'ToolBuilder-SUnit'. Installer mc unload: 'OB-Standard'. "an empty project" - (MCPackage named: 'PackageInfo') workingCopy unregister. - (MCPackage named: 'Installer') workingCopy unregister. ] ].!

1 0

Packages: Packages-Common-kph.22.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Packages-Common was added to project Packages: http://www.squeaksource.com/Packages/Packages-Common-kph.22.mcz ==================== Summary ==================== Name: Packages-Common-kph.22 Author: kph Time: 3 August 2008, 1:39:43 am UUID: 5fb3fe3b-f867-412b-8f41-55599bca75e8 Ancestors: Packages-Common-kph.21 fixing unload of Packages =============== Diff against Packages-Common-kph.21 =============== Item was changed: ----- Method: PackagesAllVersions>>Tasks (in category 'Group Development') ----- Tasks | thisVersion | self name: 'Tasks'. self version: '1+'. info description: 'Package definitions for this version of squeak'. info author: 'keith_hodges(a)yahoo.co.uk'. info owner: 'Keith Hodges'. self dependsOn: { 'Sake' }. thisVersion := 'Tasks-', SystemVersion current majorMinorVersion. self load: [ Installer squeaksource project: 'Tasks'; install: 'Tasks-Common'; install: thisVersion. ]. self unload: [ + Installer mc unload: thisVersion. + Installer mc unload: 'Tasks-Common'. - Installer unload: thisVersion. - Installer unload: 'Tasks-Common'. ]. !

1 0

Packages: Packages-Core-kph.50.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Packages-Core was added to project Packages: http://www.squeaksource.com/Packages/Packages-Core-kph.50.mcz ==================== Summary ==================== Name: Packages-Core-kph.50 Author: kph Time: 3 August 2008, 1:38:38 am UUID: 6419acc2-9808-4de3-bbf0-94c48beb6e88 Ancestors: Packages-Core-kph.49 fixing unload =============== Diff against Packages-Core-kph.49 =============== Item was changed: ----- Method: Packages>>beUnloading (in category 'as yet unclassified') ----- beUnloading actionBlock := unloadBlock. + (unloadPriors ifNil: [ self unloadDependsOn: (Array with: self taskUnloadDependants) ]). + + priors := unloadPriors. + - self unloadDependsOn: (unloadPriors ifNil: [ Array with: self taskUnloadDependants ]). hasRun := false.!

1 0

Packages: Packages-Core-kph.49.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Packages-Core was added to project Packages: http://www.squeaksource.com/Packages/Packages-Core-kph.49.mcz ==================== Summary ==================== Name: Packages-Core-kph.49 Author: kph Time: 3 August 2008, 1:33:22 am UUID: 8df7fc1d-7adb-4115-b836-c0f0e980caea Ancestors: Packages-Core-kph.48 fixing unload =============== Diff against Packages-Core-kph.48 =============== Item was changed: ----- Method: Packages>>beUnloading (in category 'as yet unclassified') ----- beUnloading actionBlock := unloadBlock. + self unloadDependsOn: (unloadPriors ifNil: [ Array with: self taskUnloadDependants ]). - priors := (unloadPriors ifNil: [ Array with: self taskUnloadDependants ]). hasRun := false.!

1 0

Packages: Packages-Common-kph.21.mcz
by squeaksource-noreply＠iam.unibe.ch 03 Aug '08

03 Aug '08

A new version of Packages-Common was added to project Packages: http://www.squeaksource.com/Packages/Packages-Common-kph.21.mcz ==================== Summary ==================== Name: Packages-Common-kph.21 Author: kph Time: 3 August 2008, 1:32:52 am UUID: eb3af8cb-7412-4b34-9376-70a99f71c951 Ancestors: Packages-Common-kph.20 fixing unload =============== Diff against Packages-Common-kph.20 =============== Item was changed: ----- Method: PackagesAllVersions>>Tasks (in category 'Group Development') ----- Tasks | thisVersion | self name: 'Tasks'. self version: '1+'. info description: 'Package definitions for this version of squeak'. info author: 'keith_hodges(a)yahoo.co.uk'. info owner: 'Keith Hodges'. self dependsOn: { 'Sake' }. thisVersion := 'Tasks-', SystemVersion current majorMinorVersion. self load: [ Installer squeaksource project: 'Tasks'; install: 'Tasks-Common'; install: thisVersion. ]. self unload: [ Installer unload: thisVersion. + Installer unload: 'Tasks-Common'. - Installer unload: 'Packages-Common'. ]. !

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages August 2008