Packages June 2013

packages@lists.squeakfoundation.org

1 participants
276 discussions

The Trunk: Tools-fbs.476.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

Frank Shearar uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-fbs.476.mcz ==================== Summary ==================== Name: Tools-fbs.476 Author: fbs Time: 28 June 2013, 8:56:08.948 pm UUID: e33fa621-870c-af40-9e54-5b343a5e8367 Ancestors: Tools-fbs.475 When you rename a message category, select the _new_ name so that you stay where you were. =============== Diff against Tools-fbs.475 =============== Item was changed: ----- Method: Browser>>renameCategory (in category 'message category functions') ----- renameCategory "Prompt for a new category name and add it before the current selection, or at the end if no current selection" | oldName newName | self hasClassSelected ifFalse: [^ self]. self okToChange ifFalse: [^ self]. self hasMessageCategorySelected ifFalse: [^ self]. oldName := self selectedMessageCategoryName. newName := self request: 'Please type new category name' initialAnswer: oldName. newName isEmpty ifTrue: [^ self] ifFalse: [newName := newName asSymbol]. newName = oldName ifTrue: [^ self]. self classOrMetaClassOrganizer renameCategory: oldName toBe: newName. self selectClassNamed: selectedClassName. + self selectMessageCategoryNamed: newName. - self selectMessageCategoryNamed: oldName. self changed: #messageCategoryList. !

1 0

The Trunk: Tools-fbs.476.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

1 0

The Trunk: Tools-fbs.476.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

1 0

The Trunk: Tools-fbs.475.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

Frank Shearar uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-fbs.475.mcz ==================== Summary ==================== Name: Tools-fbs.475 Author: fbs Time: 28 June 2013, 8:47:32.376 pm UUID: 1e99ed63-15f5-1a4f-8414-8a7bc33ca4ab Ancestors: Tools-fbs.474 Push service-y stuff out of low level code into packages closer to the UI. =============== Diff against Tools-fbs.474 =============== Item was changed: ----- Method: ArchiveViewer>>extractAll (in category 'archive operations') ----- extractAll | directory | self canExtractAll ifFalse: [^ self]. directory := FileList2 modalFolderSelector ifNil: [^ self]. + UIManager default informUserDuring: [:bar| archive extractAllTo: directory informing: bar].! - archive extractAllTo: directory.!

1 0

The Trunk: Tools-fbs.475.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

1 0

The Trunk: Tools-fbs.475.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

1 0

The Trunk: System-fbs.549.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

Frank Shearar uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-fbs.549.mcz ==================== Summary ==================== Name: System-fbs.549 Author: fbs Time: 28 June 2013, 8:45:25.76 pm UUID: 217705f1-4e04-b04c-a09c-31e343182089 Ancestors: System-fbs.548 Push service-y stuff out of low level code into packages closer to the UI. =============== Diff against System-fbs.548 =============== Item was changed: ----- Method: ExternalDropHandler class>>defaultGZipHandler (in category 'private') ----- defaultGZipHandler ^ExternalDropHandler type: nil extension: 'gz' + action: [:stream :pasteUp :event | | contents | + contents := Cursor wait showWhile: [stream viewGZipContents]. + UIManager default + edit: contents + label: 'Decompressed contents of: ', stream localName].! - action: [:stream :pasteUp :event | - stream viewGZipContents]! Item was added: + ----- Method: GZipReadStream class>>serviceViewDecompress (in category '*System-FileRegistry') ----- + serviceViewDecompress + + ^ SimpleServiceEntry + provider: self + label: 'view decompressed' + selector: #viewContents: + description: 'view decompressed' + ! Item was added: + ----- Method: GZipReadStream class>>viewContents: (in category '*System-FileRegistry') ----- + viewContents: fullFileName + "Open the decompressed contents of the .gz file with the given name. This method is only required for the registering-file-list of Squeak 3.3a and beyond, but does no harm in an earlier system" + + (FileStream readOnlyFileNamed: fullFileName) ifNotNil: + [:aStream | | contents | + contents := Cursor wait showWhile: [aStream viewGZipContents]. + UIManager default + edit: contents + label: 'Decompressed contents of: ', aStream localName].!

1 0

The Trunk: System-fbs.549.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

1 0

The Trunk: System-fbs.549.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

1 0

The Trunk: Compression-fbs.35.mcz
by commits＠source.squeak.org 28 Jun '13

28 Jun '13

Frank Shearar uploaded a new version of Compression to project The Trunk: http://source.squeak.org/trunk/Compression-fbs.35.mcz ==================== Summary ==================== Name: Compression-fbs.35 Author: fbs Time: 28 June 2013, 8:44:46.942 pm UUID: 1dc85a45-cd8a-1644-aded-fbcf28435e5d Ancestors: Compression-fbs.34 Push service-y stuff out of low level code into packages closer to the UI. =============== Diff against Compression-fbs.34 =============== Item was changed: ----- Method: FileStream>>viewGZipContents (in category '*Compression') ----- viewGZipContents "View the contents of a gzipped file" | stringContents | self binary. stringContents := self contentsOfEntireFile. + stringContents := (GZipReadStream on: stringContents) upToEnd. + ^ stringContents asString withSqueakLineEndings.! - stringContents := Cursor wait showWhile: [(GZipReadStream on: stringContents) upToEnd]. - stringContents := stringContents asString withSqueakLineEndings. - - UIManager default - edit: stringContents - label: 'Decompressed contents of: ', self localName! Item was removed: - ----- Method: GZipReadStream class>>serviceViewDecompress (in category 'fileIn/Out') ----- - serviceViewDecompress - - ^ SimpleServiceEntry - provider: self - label: 'view decompressed' - selector: #viewContents: - description: 'view decompressed' - ! Item was removed: - ----- Method: GZipReadStream class>>viewContents: (in category 'fileIn/Out') ----- - viewContents: fullFileName - "Open the decompressed contents of the .gz file with the given name. This method is only required for the registering-file-list of Squeak 3.3a and beyond, but does no harm in an earlier system" - - (FileStream readOnlyFileNamed: fullFileName) ifNotNil: - [:aStream | aStream viewGZipContents]! Item was changed: ----- Method: ZipArchive>>extractAllTo: (in category 'archive operations') ----- extractAllTo: aDirectory "Extract all elements to the given directory" + self extractAllTo: aDirectory informing: nil.! - UIManager default informUserDuring:[:bar|self extractAllTo: aDirectory informing: bar].! Item was changed: ----- Method: ZipArchive>>extractAllTo:informing: (in category 'archive operations') ----- extractAllTo: aDirectory informing: bar + "Extract all elements to the given directory, notifying the user of progress" - "Extract all elements to the given directory" ^self extractAllTo: aDirectory informing: bar overwrite: false!

1 0

← Newer
1
...
4
5
6
7
8
9
10
...
28
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages June 2013