Packages May 2008

packages@lists.squeakfoundation.org

4 participants
42 discussions

Packages: Packages-Common-kph.9.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

A new version of Packages-Common was added to project Packages: http://www.squeaksource.com/Packages/Packages-Common-kph.9.mcz ==================== Summary ==================== Name: Packages-Common-kph.9 Author: kph Time: 30 May 2008, 6:54:02 pm UUID: 2295c670-bd79-4e46-afdb-c7d6bd99178b Ancestors: Packages-Common-kph.8 Installer unload: becomes Installer mc unload: =============== Diff against Packages-Common-kph.8 =============== Item was changed: ----- Method: PackagesAllVersions>>Scriptaculous (in category 'Web Development') ----- Scriptaculous self name: 'Scriptaculous'. info category: 'Web Development'. info description: 'High-level Javascript bindings for the Seaside web application framework. This package includes PrototypeJS (http://www.prototypejs.org) and script.aculo.us (http://script.aculo.us).'. info maintainer: 'Lukas Renggli <renggli(a)gmail.com>'. info homepage: 'http://scriptaculous.seasidehosting.st/'. info squeakMapID: ''. self version: '2.8+'. self load: [ Installer ss project: 'Seaside'; install: 'Scriptaculous-lr'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Scriptaculous'. - Installer unload: 'Scriptaculous'. ].! Item was changed: ----- Method: PackagesAllVersions>>SqueakMap2base (in category 'Group Development') ----- SqueakMap2base self name: 'SqueakMap2base'. self version: '1.86+'. info category: 'Group Development'. info description: 'The new SqueakMap with lots of good stuff. :)'. info maintainer: 'goran'. info homepage: 'http://map.squeak.org'. info url: 'http://squeak.krampe.se/SMBase-dew.86.mcz'. self provides: #(). self dependsOn: #( ). self load: [ Installer wsm install: 'SqueakMap2 base'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'SMBase'. - Installer unload: 'SMBase'. ].! Item was changed: ----- Method: PackagesAllVersions>>SqueakMap2loader (in category 'Group Development') ----- SqueakMap2loader self name: 'SqueakMap2 base'. self version: '1.86+'. info category: 'Group Development'. info description: 'This is the graphical tool called the "SqueakMap Package Loader" that can be opened from the World open... menu. This tool is a UI for the local instance of SMSqueakMap that can be accessed with "SMSqueakMap default". In the loader you can browse the map and see packages and package releases and also install them into the image. '. info maintainer: 'goran'. info homepage: 'http://map.squeak.org'. info url: 'http://squeak.krampe.se/SMLoader-btr.55.mcz'. self provides: #(). self dependsOn: #( 'SqueakMap2 base' ). self load: [ Installer wsm install: 'SqueakMap2 loader'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Smalltalk at: #SMLoader ifPresent: [ :c | c unload ]. - - Installer unload: 'SMLoader'. Flaps replaceToolsFlap. + Installer mc unload: 'SMLoader'. ].! Item was changed: ----- Method: PackagesAllVersions>>PierModel (in category 'Web Development') ----- PierModel self name: 'Pier-Model'. info category: 'Development'. info description: 'Pier is a powerful and extensible implementation of a meta-described content management and Wiki system, written with objects from top to bottom: (1) Object-Oriented Design: Pier features a fully object oriented and meta-described domain model. As an example, the content of the pages is parsed and stored as a tree of different entities representing text, links, tables, lists, etc. (2) Extensibility: Everything in Pier can be extended: page types, storage mechanism, actions, security mechanism, web-server, etc. Plug-ins can be shared within the community and loaded independently of each other into the system. (3) Open Source: Pier is released under the MIT license which grants unrestricted rights to copy, modify, and redistribute as long as the original copyright and license terms are retained. (4) Test Suites: Pier is heavily tested. There are more than 1200 unit tests included with the core of Pier. This makes it easy to change and verify the code and comes in extremely useful when porting Pier to other Smalltalk dialects or when writing extensions.'. info maintainer: 'Lukas Renggli <renggli(a)gmail.com>'. info homepage: 'http://www.lukas-renggli.ch/smalltalk/pier'. info url: 'http://mc.lukas-renggli.ch/pier/Pier-Model-lr.217.mcz'. self version: '1.0.16.217+'. self provides: #(). self dependsOn: #('Magritte-Model'). self load: [ Installer lukas project: 'pier'; install: 'Pier-Model'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Pier-Model'. - Installer unload: 'Pier-Model'. ].! Item was changed: ----- Method: PackagesAllVersions>>Seaside (in category 'Web Development') ----- Seaside self name: 'Seaside'. info category: 'Web Development'. info description: 'A framework for building sophisticated web applications in Squeak. Develop for the web using reusable, embeddable components and unique call/return semantics for moving between pages.'. info maintainer: 'Lukas Renggli <renggli(a)gmail.com>'. info homepage: 'http://www.seaside.st/'. info squeakMapID: ''. info url: 'http://www.squeaksource.com/Seaside.html'. self version: '2.8+'. info licence: 'MIT'. self dependsOn: #('KomHttpServer'). self load: [ Installer squeaksource project: 'Seaside'; answer: '*config*' with: 'seaside'; answer: '*password*' with: 'admin'; install: #('Seaside2.8a1-lr' 'Seaside2.8a1-pmm'). Installer unload: 'Seaside2.8a1'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Seaside'. - Installer unload: 'Seaside'. ].! Item was changed: ----- Method: PackagesAllVersions>>DynamicBindings (in category 'Languages and Extensions') ----- DynamicBindings self name: 'DynamicBindings'. self version: '2.7+'. info category: 'Languages and Extensions'. info maintainer: 'Lex Spoon <lex(a)lexspoon.org>'. info homepage: ''. info squeakMapID: ''. info url: 'http://www.squeaksource.com/KomHttpServer.html'. self provides: #(). self dependsOn: #(). self load: [ Installer squeaksource project: 'KomHttpServer'; install: 'DynamicBindings'. ]. self unloadDependsOn: { self taskUnloadDependants. }. self unload: [ + Installer mc unload: 'DynamicBindings'. - Installer unload: 'DynamicBindings'. ].! Item was changed: ----- Method: PackagesAllVersions>>MagritteMorph (in category 'Development') ----- MagritteMorph self name: 'Magritte-Morph'. self version: '1.0.16.42+'. info category: 'Morphs'. info description: 'Magritte bindings for Morphic.'. info maintainer: 'Lukas Renggli <renggli(a)gmail.com>'. info homepage: 'http://www.lukas-renggli.ch/smalltalk/magritte'. info squeakMapID: ''. info url: 'http://mc.lukas-renggli.ch/magritte/Magritte-Morph-lr.42.mcz'. self provides: #(). self dependsOn: #('Magritte-Model'). self load: [ Installer lukas project: 'magritte'; install: 'Magritte-Morph'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Magritte-Morph'. - Installer unload: 'Magritte-Morph'. ].! Item was changed: ----- Method: PackagesAllVersions>>jQueryFlot (in category 'Web Development') ----- jQueryFlot self name: 'jQuery-Flot'. info category: 'Web Development'. info description: 'jQuery Javascript library, an alternative to prototype, for use with Seaside, uses jQuery framework'. info maintainer: 'Sebastian Sastre <ssastre(a)seaswork.com>'. info homepage: 'http://www.squeaksource.com/jQuery.html'. self version: '4+'. self provides: #(). self dependsOn: #('jQuery'). self load: [ Installer squeaksource project:'jQuery' ; install: 'Flot'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Flot'. - Installer unload: 'Flot'. ].! Item was changed: ----- Method: PackagesAllVersions>>MagritteModel (in category 'Development') ----- MagritteModel self name: 'Magritte-Model'. self version: '1.0.16.310+'. info category: 'Development'. info description: 'Most applications consist of a big number of model- or so called domain-objects. Building different views, editors, and reports; querying, validating and storing those objects is very repetitive and error-prone, if an object changes its shape frequently. Magritte is a fully dynamic meta-description framework that helps to solve those problems, while keeping the full power to the programmer in all aspects. Moreover since Magritte is described in itself, you can let your users modify the meta-world and add their own fields and forms without writing a single line of code.'. info maintainer: 'Lukas Renggli <renggli(a)gmail.com>'. info homepage: 'http://www.lukas-renggli.ch/smalltalk/magritte'. info squeakMapID: ''. info url: 'http://mc.lukas-renggli.ch/magritte/Magritte-Model-lr.310.mcz'. self provides: #(). self dependsOn: #(). self load: [ Installer lukas project: 'magritte'; install: 'Magritte-Model'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Magritte-Model'. - Installer unload: 'Magritte-Model'. ].! Item was changed: ----- Method: PackagesAllVersions>>KomServices (in category 'Network') ----- KomServices self name: 'KomServices'. self version: '1+'. info category: 'Network'. info description: 'KomServices provides a framework for the creation and management of background processes. A generic Service class is provided for this purpose. Additionally, TcpService is provided for creating services that respond to inbound TCP connections. '. info maintainer: 'Lex Spoon <lex(a)lexspoon.org>'. info homepage: ''. info squeakMapID: ''. self provides: #(). self dependsOn: #('DynamicBindings'). self load: [ Installer squeaksource project: 'KomHttpServer' ; install: 'KomServices'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'KomServices'. - Installer unload: 'KomServices'. ].! Item was changed: ----- Method: PackagesAllVersions>>MagritteSeaside (in category 'Web Development') ----- MagritteSeaside self name: 'Magritte-Seaside'. info category: 'Web Development'. info description: 'Magritte bindings for Seaside.'. info maintainer: 'Lukas Renggli <renggli(a)gmail.com>'. info homepage: 'http://www.lukas-renggli.ch/smalltalk/magritte'. info squeakMapID: ''. info url: 'http://mc.lukas-renggli.ch/magritte/Magritte-Seaside-lr.259.mcz'. self version: '1.0.16.259+'. self provides: #(). self dependsOn: #('Scriptaculous' 'Seaside' 'Magritte-Model'). self load: [ Installer lukas project: 'magritte'; install: 'Magritte-Seaside'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Magritte-Seaside'. - Installer unload: 'Magritte-Seaside'. ].! Item was changed: ----- Method: PackagesAllVersions>>NiftyCorners (in category 'Web Development') ----- NiftyCorners self name: 'NiftyCorners'. info category: 'Web Development'. info description: 'NiftyCornersCube Javascript library for use with Seaside'. info maintainer: 'kph'. info homepage: 'http://www.squeaksource.com/Jetsam.html'. "the js library is licenced GPL, for GPL read can of worms" info licence: 'GPL'. self version: '2.8.1+'. self provides: #(). self dependsOn: #('Seaside'). self load: [ Installer squeaksource project:'Jetsam' ; install: 'Seaside28Jetsam'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Seaside28Jetsam-NiftyCorners'. - Installer unload: 'Seaside28Jetsam-NiftyCorners'. ].! Item was changed: ----- Method: PackagesAllVersions>>jQuerySUExtensions (in category 'Web Development') ----- jQuerySUExtensions self name: 'jQuery-SUExtensions'. info category: 'Web Development'. info description: 'extensions to Scriptaculous to support jQuery framework (I think?)'. info maintainer: 'Sebastian Sastre <ssastre(a)seaswork.com>'. info homepage: 'http://www.squeaksource.com/jQuery.html'. self version: '6+'. self provides: #(). self dependsOn: #('Scriptaculous' 'jQUery-SUExtensions'). self load: [ Installer squeaksource project:'jQuery' ; install: 'SUExtensions'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'SUExtensions'. - Installer unload: 'SUExtensions'. ].! Item was changed: ----- Method: PackagesAllVersions>>jQuery (in category 'Web Development') ----- jQuery self name: 'jQuery'. info category: 'Web Development'. info description: 'jQuery Javascript library, an alternative to prototype, for use with Seaside, uses jQuery framework'. info maintainer: 'Sebastian Sastre <ssastre(a)seaswork.com>'. info homepage: 'http://www.squeaksource.com/jQuery.html'. self version: '6+'. self provides: #(). self dependsOn: #('Seaside' 'jQUery-SUExtensions'). self load: [ Installer squeaksource project:'jQuery' ; install: 'jQuery'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'jQuery'. - Installer unload: 'jQuery'. ].! Item was changed: ----- Method: PackagesAllVersions>>PierSeaside (in category 'Web Development') ----- PierSeaside self name: 'Pier-Seaside'. info category: 'Web Development'. info description: 'Pier bindings for Seaside.'. info maintainer: 'Lukas Renggli <renggli(a)gmail.com>'. info homepage: 'http://www.lukas-renggli.ch/smalltalk/pier'. self version: '1.0.16.269+'. self provides: #(). self dependsOn: #('Seaside' 'Pier-Model' 'Scriptaculous' 'Magritte-Seaside'). self unloadDependsOn: { self taskUnloadDependants }. self unload: [ Installer unload: 'Pier-Seaside'. ]. self load: [ Installer lukas project:'pier'; answer: '*Would*' with: true; answer: '*Pier kernel*' with: 'Pier'; answer: '*entry point*' with: 'pier'; answer: '*Pier-Application*' with: true; install:'Pier-Seaside'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'Pier-Seaside'. - Installer unload: 'Pier-Seaside'. ].! Item was changed: + ----- Method: PackagesAllVersions>>KomHttpServer (in category 'Languages and Extensions') ----- - ----- Method: PackagesAllVersions>>KomHttpServer (in category 'Network') ----- KomHttpServer self name: 'KomHttpServer'. self version: '7.0+'. info category: 'Network'. info maintainer: 'Lex Spoon <lex(a)lexspoon.org>'. info homepage: ''. info squeakMapID: ''. self provides: #(). self dependsOn: #('KomServices'). self load: [ Installer squeaksource project: 'KomHttpServer' ; install: 'KomHttpServer'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'KomHttpServer'. - Installer unload: 'KomHttpServer'. ].! Item was changed: ----- Method: PackagesAllVersions>>jQueryCurvyCorners (in category 'Web Development') ----- jQueryCurvyCorners self name: 'jQuery-CurvyCorners'. info category: 'Web Development'. info description: 'CurvyCornersCube Javascript library for use with Seaside, uses jQuery framework'. info maintainer: 'Sebastian Sastre <ssastre(a)seaswork.com>'. info homepage: 'http://www.squeaksource.com/jQuery.html'. self version: '6+'. self provides: #(). self dependsOn: #('Seaside' 'jQuery'). self load: [ Installer squeaksource project:'jQuery' ; install: 'CurvyCorners'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ + Installer mc unload: 'CurvyCorners'. - Installer unload: 'CurvyCorners'. ].!

1 0

Packages: Packages-Core-kph.37.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

A new version of Packages-Core was added to project Packages: http://www.squeaksource.com/Packages/Packages-Core-kph.37.mcz ==================== Summary ==================== Name: Packages-Core-kph.37 Author: kph Time: 30 May 2008, 6:53:25 pm UUID: ede90fb2-8ee0-4417-bd11-f7afb0e2276d Ancestors: Packages-Core-kph.36 Installer unload: becomes Installer mc unload: =============== Diff against Packages-Core-kph.36 =============== Item was added: + ----- Method: Packages class>>privateIsDefined: (in category 'private') ----- + privateIsDefined: packageName + + ^ self respondsTo: (self asSelector: packageName)! Item was changed: ----- Method: Packages class>>taskGenerateUniversePackageTasks (in category 'tasks - universes') ----- taskGenerateUniversePackageTasks + | source | - | source selector | ^ SakeTask define: [ :task | task dependsOn: { [ self isUniverse ]. (SakeTask class: self) removeSelectorsMatching: '*'. self taskUpdateUniverse. }. task action: [ (self theUUniverse packageNames collect: [ :each | self theUUniverse newestPackageNamed: each ]) do: [ :each | source := (WriteStream on: String new). + source << (self asSelector: each name). - source << (selector := self asSelector: each name). source cr; cr. source << ' self name: ' << each name printString << '.' ; cr. source << ' self version: ''' << each version << '''.' ; cr; cr. source << ' info category: ''' << each category printString << '''.' ; cr. source << ' info description: ' ; cr. source << each description withSqueakLineEndings printString << '.' ; cr. source << ' info maintainer: ''' << each maintainer << '''.' ; cr. source << ' info homepage: ''' << (each homepage ifNil: ['']) asString << '''.' ; cr. source << ' info squeakMapID: ''' << (each squeakMapID ifNil: ['']) asString << '''.' ; cr. source << ' info url: ''' << each url printString << '''.' ; cr. source << ' self provides: ' << each provides asArray printString << '.' ; cr ; cr. source << ' self dependsOn: ' << each depends asArray printString << '.' ; cr ; cr. source << ' self load: [' ; cr. each url ifNotNil: [ source << ' Installer installUrl:''' << each url printString << '''.' ; cr. ]. source << ' ].' ; cr ; cr. source << ' self unloadDependsOn: { self taskUnloadDependants }.' ; cr. source << ' self unload: [' ; cr. each url ifNotNil: [ + source << ' Installer mc unload: ' << each name printString << '.' ; cr. - source << ' Installer unload: ' << each name printString << '.' ; cr. ]. source << ' ].'. + + + self compile: source contents classified: each category printString notifying: nil - - (self sourceCodeAt: selector) ~= source ifTrue: [ - self compile: source contents classified: each category printString notifying: nil - ] ]. theUUniverse := nil. ]. ]! Item was added: + ----- Method: Packages class>>isBeta (in category 'testing') ----- + isBeta + + ^ self name endsWith: 'beta'! Item was changed: ----- Method: Packages class>>basicNamed: (in category 'private') ----- basicNamed: packageName + ^ ((self isCurrent or: [ self privateIsDefined: packageName ]) ifTrue: [ self ] ifFalse: [ self current ]) + + basicNew perform: (self asSelector: packageName); initialize; yourself! - ^ self basicNew perform: (self asSelector: packageName); initialize; yourself! Item was changed: ----- Method: Packages class>>current (in category 'public') ----- current + ^ (Smalltalk classNamed: ('Packages' , SystemVersion current version asLegalSelector capitalized) asSymbol) + + ifNil: [ Smalltalk classNamed: ('Packages' , SystemVersion current majorMinorVersion asLegalSelector capitalized) asSymbol ] + ! - ^ Smalltalk classNamed: ('Packages' , SystemVersion current majorMinorVersion asLegalSelector capitalized) asSymbol!

1 0

Installer: Installer-Core-kph.199.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.199.mcz ==================== Summary ==================== Name: Installer-Core-kph.199 Author: kph Time: 30 May 2008, 2:40:22 pm UUID: 85089486-7806-40ad-944b-25d5fb0d737e Ancestors: Installer-Core-kph.198 removed unloadTests: =============== Diff against Installer-Core-kph.198 =============== Item was removed: - ----- Method: Installer>>unloadTests: (in category 'actions') ----- - unloadTests: match - - (MCWorkingCopy allManagers select: [ :wc | match match: (wc package name) ]) - do: [ :wc | - self logCR: 'Unloading ', wc package asString. - wc unloadTests. - - ]. - - self unloadCleanUp!

1 0

DeltaStreams: SystemEditor-mtf.91.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

Matthew Fulmer uploaded a new version of SystemEditor to project DeltaStreams: http://www.squeaksource.com/DeltaStreams/SystemEditor-mtf.91.mcz ==================== Summary ==================== Name: SystemEditor-mtf.91 Author: mtf Time: 23 April 2008, 9:33:22 am UUID: dd2e9b7f-db9c-419d-810e-f8505c5947fa Ancestors: SystemEditor-mtf.90 added a method to directly set instance variable names =============== Diff against SystemEditor-mtf.90 =============== Item was added: + ----- Method: MetaclassEditor>>instanceVariableNames: (in category 'reflecting') ----- + instanceVariableNames: instString + instVarNames := Scanner new scanFieldNames: instString! Item was added: + ----- Method: ClassEditor>>instanceVariableNames: (in category 'reflecting') ----- + instanceVariableNames: instString + instVarNames := Scanner new scanFieldNames: instString!

1 0

DeltaStreams: DeltaStreams-UI-mtf.4.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

Matthew Fulmer uploaded a new version of DeltaStreams-UI to project DeltaStreams: http://www.squeaksource.com/DeltaStreams/DeltaStreams-UI-mtf.4.mcz ==================== Summary ==================== Name: DeltaStreams-UI-mtf.4 Author: mtf Time: 30 May 2008, 12:47:01 am UUID: 7c4d2832-4984-4547-a56c-992172ad1bb2 Ancestors: DeltaStreams-UI-mtf.3 reversed the order most of the iterators in the browser iterate thru changes. Now they iterate in chronological order, rather than view order. fixed some bugs in some existnig menu commands, and implemented "only show class changes" =============== Diff against DeltaStreams-UI-mtf.3 =============== Item was changed: ----- Method: DSDeltaStreamBrowser>>shownChangeIndexesDo: (in category 'change list') ----- shownChangeIndexesDo: aBlock + "For every change shown, evaluate the block with it's index in allChanges. This is done in chronological order, which is the reverse of the order listed." - "For every change shown, evaluate the block with it's index in allChanges" shownChangeIndexes + ifNotNil: [shownChangeIndexes reverseDo: aBlock] + ifNil: [1 to: self allChanges size do: aBlock]! - ifNotNil: [shownChangeIndexes do: aBlock] - ifNil: [self allChanges size to: 1 by: -1 do: aBlock]! Item was added: + ----- Method: DSDeltaStreamBrowser>>onlyClassChanges (in category 'class list') ----- + onlyClassChanges + "Limit the visible changes to those of the selected class" + + | protoChange | + protoChange := self selectedClassGroupKey. + self shownChangesSelectVisible: [:change :highlighted | + change inClassGroupFor: protoChange]! Item was added: + ----- Method: DSDeltaStreamBrowser>>preserveSelectionAround: (in category 'as yet unclassified') ----- + preserveSelectionAround: aBlock + "saves the selected category/class/protocol/method, evaluates the block, and restores the selection" + + aBlock value + " + self selectCategoryForClass: classEditor theNonMetaClass. + self selectClass: classEditor theNonMetaClass. + self metaClassIndicated: classEditor isMeta. + self selectMessageCategoryNamed: methodEditor category. + self selectedMessageName: methodEditor selector. + "! Item was changed: ----- Method: DSDeltaStreamBrowser>>shownChangesIndexesDo: (in category 'change list') ----- shownChangesIndexesDo: aBlock "For every change shown, evaluate the block with its index in allChanges, and its view index" + + | viewIndex | + viewIndex := self changeListSize + 1. + self shownChangeIndexesDo: [:index | + aBlock value: index value: (viewIndex := viewIndex - 1)]! - shownChangeIndexes - ifNotNil: [shownChangeIndexes withIndexDo: aBlock] - ifNil: [self allChanges size to: 1 by: -1 do: [:index | - aBlock value: index value: self allChanges size - index + 1]]! Item was changed: ----- Method: DSDeltaStreamBrowser>>computeSystemEditor (in category 'change list') ----- computeSystemEditor + delta ifNil: [self editor: nil. ^ self]. - delta ifNil: - [self editor: nil. - ^ self]. self editor: SystemEditorUIModel new. changeApplier := DSUIApplier on: self editor. + changeApplier validate: self isValidating. + self shownChangesDo: [:change | change applyUsing: changeApplier]! - "changeApplier := DSChangeViewFilter on: (DSEvilErrorIgnorer - on: (DSSystemEditorApplier on: self editor))." - delta isLogging - ifTrue: [delta compositeChange asAntiChange applyUsing: changeApplier] - ifFalse: [delta compositeChange applyUsing: changeApplier]! Item was added: + ----- Method: DSDeltaStreamBrowser>>shownChangesDo: (in category 'change list') ----- + shownChangesDo: aBlock + "For every change shown, evaluate the block" + self shownChangeIndexesDo: [:index | + aBlock value: (self allChanges at: index)]! Item was changed: ----- Method: DSDeltaStreamBrowser>>changeListIndex: (in category 'change list plug') ----- changeListIndex: externalIndex | change | self log this. changeListIndex = externalIndex ifTrue: [^ self]. "Quick return" changeListIndex := externalIndex. changeListIndex = 0 ifTrue: [^ self]. self queueChangesDuring: [ change := self shownChangeAt: changeListIndex. self selectChangeSubject: change. + self changed: #changeListIndex. - "self changed: #changeListIndex." ]! Item was changed: ----- Method: DSDeltaStreamBrowser>>shownChangesSelectVisible: (in category 'change list') ----- shownChangesSelectVisible: aBlock "Select which changes to keep visible by evaluating aBlock with each change and its selected status" | newShownChangeIndexes | newShownChangeIndexes := OrderedCollection new. self shownChangesWithIndexAndHighlightDo: [:change :index :selected | (aBlock value: change value: selected) ifTrue: [newShownChangeIndexes add: index]]. changeListIndex := 0. changeListSelection := nil. shownChangeIndexes := newShownChangeIndexes. + self halt. self computeSystemEditor. self changed: #changeList. self changed: #systemCategoryList!

1 0

Installer: Installer-Core-kph.198.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.198.mcz ==================== Summary ==================== Name: Installer-Core-kph.198 Author: kph Time: 30 May 2008, 6:40:38 am UUID: 9bc95b7a-2ef8-40e2-ae0d-8246f42d9330 Ancestors: Installer-Core-kph.197 refactored unload: and added unloadTests: NOTE use " Installer mc unload: " in future. =============== Diff against Installer-Core-kph.197 =============== Item was changed: ----- Method: Installer class>>unload: (in category 'unload') ----- unload: categoryMatchesString + ^ self error: 'deprecated, use Installer mc unload: ''pkgname''.'! - ^ self new unload: categoryMatchesString! Item was added: + ----- Method: Installer>>unloadTests: (in category 'actions') ----- + unloadTests: match + + (MCWorkingCopy allManagers select: [ :wc | match match: (wc package name) ]) + do: [ :wc | + self logCR: 'Unloading ', wc package asString. + wc unloadTests. + + ]. + + self unloadCleanUp! Item was added: + ----- 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 ] ]. + SmalltalkImage current fixObsoleteReferences.! Item was changed: ----- Method: Installer>>unload: (in category 'actions') ----- unload: match (MCWorkingCopy allManagers select: [ :wc | match match: (wc package name) ]) do: [ :wc | self logCR: 'Unloading ', wc package asString. wc unload. + - SystemOrganization removeEmptyCategories. ]. + self unloadCleanUp! - "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 ] ]. - SmalltalkImage current fixObsoleteReferences.!

1 0

Installer: Installer-Core-kph.197.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.197.mcz ==================== Summary ==================== Name: Installer-Core-kph.197 Author: kph Time: 30 May 2008, 5:13:45 am UUID: 83fcff38-5c70-429d-8b16-cbf04ee33be7 Ancestors: Installer-Core-kph.196 mod to unload =============== Diff against Installer-Core-kph.196 =============== Item was changed: ----- Method: Installer>>unload: (in category 'actions') ----- unload: match (MCWorkingCopy allManagers select: [ :wc | match match: (wc package name) ]) do: [ :wc | self logCR: 'Unloading ', wc package asString. wc unload. + SystemOrganization removeEmptyCategories. - wc package packageInfo systemCategories do: [ :cat | - SystemOrganization removeCategory: cat. - ]. ]. "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 ] ]. SmalltalkImage current fixObsoleteReferences.!

1 0

Installer: Installer-Core-kph.196.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.196.mcz ==================== Summary ==================== Name: Installer-Core-kph.196 Author: kph Time: 30 May 2008, 2:18:09 am UUID: f84e04f6-da36-4f20-b8c6-38c4c213c538 Ancestors: Installer-Core-kph.195 Removed a hard reference to UUniverse =============== Diff against Installer-Core-kph.195 =============== Item was changed: ----- Method: Installer class>>universe (in category 'instanciation') ----- universe + ^ self new universe: (self classUGlobalInstaller universe: self classUUniverse systemUniverse)! - ^ self new universe: (self classUGlobalInstaller universe: UUniverse systemUniverse)!

1 0

Packages: Packages-Squeak310-kph.33.mcz
by squeaksource-noreply＠iam.unibe.ch 30 May '08

30 May '08

A new version of Packages-Squeak310 was added to project Packages: http://www.squeaksource.com/Packages/Packages-Squeak310-kph.33.mcz ==================== Summary ==================== Name: Packages-Squeak310-kph.33 Author: kph Time: 30 May 2008, 2:10:45 am UUID: 778ecc65-dc5b-4125-81cb-965eaaeb2ccd Ancestors: Packages-Squeak310-kph.32 updated Null defn =============== Diff against Packages-Squeak310-kph.32 =============== Item was changed: ----- Method: PackagesSqueak310U>>Null (in category 'Model Extension') ----- Null self name: 'Null'. + self version: '0.14'. - self version: '0.13'. info category: 'Model Extension'. info description: 'Message Eating Null package for Squeak.'. info maintainer: 'Damien Cassou <damien.cassou(a)gmail.com>'. info homepage: 'http://wiki.squeak.org/squeak/5962'. info squeakMapID: ''. + info url: 'http://www.squeaksource.com/Null/Null-kph.14.mcz'. - info url: 'http://www.squeaksource.com/Null/Null-kph.13.mcz'. self provides: #(). self dependsOn: #(). self load: [ + Installer installUrl:'http://www.squeaksource.com/Null/Null-kph.14.mcz'. - Installer installUrl:'http://www.squeaksource.com/Null/Null-kph.13.mcz'. ]. self unloadDependsOn: { self taskUnloadDependants }. self unload: [ Installer unload: 'Null'. ].!

1 0

DeltaStreams: DeltaStreams-UI-mtf.3.mcz
by squeaksource-noreply＠iam.unibe.ch 29 May '08

29 May '08

Matthew Fulmer uploaded a new version of DeltaStreams-UI to project DeltaStreams: http://www.squeaksource.com/DeltaStreams/DeltaStreams-UI-mtf.3.mcz ==================== Summary ==================== Name: DeltaStreams-UI-mtf.3 Author: mtf Time: 29 May 2008, 2:15:22 pm UUID: 3462d36c-65c1-4a6d-83b9-6b57fab6c0c8 Ancestors: DeltaStreams-UI-mtf.2 ported the changes I made between DeltaStreams-mtf.138 and DeltaStreams-mtf.139: fixed a few bugs in the visibility selection code =============== Diff against DeltaStreams-UI-mtf.2 =============== Item was added: + ----- Method: DSDeltaStreamBrowser>>changeListShowAll (in category 'change list menu') ----- + changeListShowAll + shownChangeIndexes := nil. + self computeSystemEditor. + self changed: #changeList. + self changed: #systemCategoryList.! Item was changed: ----- Method: DSDeltaStreamBrowser>>delta: (in category 'accessing') ----- delta: aDelta delta == aDelta ifTrue: [^ self]. changeListIndex := 0. versionListIndex := 0. delta ifNotNil: [delta removeDependent: self]. delta := aDelta. delta ifNotNil: [delta addDependent: self]. unsavedChanges := nil. shownChangeIndexes := nil. changeListShowList := nil. changeListShowFilter := nil. changeListSelection := nil. + self computeSystemEditor.! - delta ifNil: - [self editor: nil. - ^ self]. - self editor: SystemEditorUIModel new. - changeApplier := DSUIApplier on: self editor. - "changeApplier := DSChangeViewFilter on: (DSEvilErrorIgnorer - on: (DSSystemEditorApplier on: self editor))." - delta isLogging - ifTrue: [delta compositeChange asAntiChange applyUsing: changeApplier] - ifFalse: [delta compositeChange applyUsing: changeApplier]! Item was added: + ----- Method: DSDeltaStreamBrowser>>computeSystemEditor (in category 'change list') ----- + computeSystemEditor + delta ifNil: + [self editor: nil. + ^ self]. + self editor: SystemEditorUIModel new. + changeApplier := DSUIApplier on: self editor. + "changeApplier := DSChangeViewFilter on: (DSEvilErrorIgnorer + on: (DSSystemEditorApplier on: self editor))." + delta isLogging + ifTrue: [delta compositeChange asAntiChange applyUsing: changeApplier] + ifFalse: [delta compositeChange applyUsing: changeApplier]! Item was changed: ----- Method: DSDeltaStreamBrowser>>shownChangesSelectVisible: (in category 'change list') ----- shownChangesSelectVisible: aBlock "Select which changes to keep visible by evaluating aBlock with each change and its selected status" | newShownChangeIndexes | newShownChangeIndexes := OrderedCollection new. self shownChangesWithIndexAndHighlightDo: [:change :index :selected | (aBlock value: change value: selected) ifTrue: [newShownChangeIndexes add: index]]. changeListIndex := 0. changeListSelection := nil. shownChangeIndexes := newShownChangeIndexes. + self computeSystemEditor. self changed: #changeList. self changed: #systemCategoryList! Item was removed: - ----- Method: DSDeltaStreamBrowser>>changeListSelectionInternalAt:put: (in category 'change list') ----- - changeListSelectionInternalAt: internalIndex put: aBooleanOrNil - | aBoolean | - aBoolean := aBooleanOrNil ifNil: [false]. - (aBoolean isKindOf: Boolean) ifFalse: [self halt]. - aBoolean == (self changeListSelectionInternalAt: internalIndex) ifTrue: [^ self]. - changeListSelection ifNil: [changeListSelection := OrderedCollection new atAllPut: false]. - "make sure the list is big enough" - changeListSelection ensureIndex: internalIndex fillWith: false. - changeListSelection at: internalIndex put: aBoolean! Item was removed: - ----- Method: DSDeltaStreamBrowser>>changeListSelectionAtChanges:put: (in category 'change list') ----- - changeListSelectionAtChanges: aCompositeChange put: aBoolean - "Select/unselect the changes in the change list. Depends on each change's number being set correctly" - - aCompositeChange do: [:change | self changeListSelectionInternalAt: change number put: aBoolean]!

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages May 2008