Packages December 2011

packages@lists.squeakfoundation.org

1 participants
144 discussions

The Trunk: Collections-cmm.468.mcz
by commits＠source.squeak.org 26 Dec '11

26 Dec '11

Chris Muller uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-cmm.468.mcz ==================== Summary ==================== Name: Collections-cmm.468 Author: cmm Time: 26 December 2011, 12:56:38.443 pm UUID: b0f39ad3-ea43-4c20-848b-adbd7e61224d Ancestors: Collections-cmm.466 Merged. =============== Diff against Collections-ul.465 =============== Item was added: + ----- Method: HashedCollection class>>arrayType (in category 'private') ----- + arrayType + ^ Array! Item was changed: ----- Method: HashedCollection>>growTo: (in category 'private') ----- growTo: anInteger "Grow the elements array and reinsert the old elements" | oldElements | oldElements := array. + array := self class arrayType new: anInteger. - array := Array new: anInteger. self noCheckNoGrowFillFrom: oldElements! Item was changed: ----- Method: HashedCollection>>initialize: (in category 'private') ----- initialize: n "Initialize array to an array size of n" + array := self class arrayType new: n. - array := Array new: n. tally := 0!

1 0

The Trunk: Collections-cmm.468.mcz
by commits＠source.squeak.org 26 Dec '11

26 Dec '11

1 0

The Trunk: Morphic-cmm.577.mcz
by commits＠source.squeak.org 24 Dec '11

24 Dec '11

Chris Muller uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-cmm.577.mcz ==================== Summary ==================== Name: Morphic-cmm.577 Author: cmm Time: 29 August 2011, 9:09:42.052 pm UUID: 5227dddb-7836-46d3-9522-a96776d7035c Ancestors: Morphic-cmm.576 - When using the new list-filtering, if the user's keystroke will cause filtering to an empty list, then flash rather than present an empty list. - Preserve 300ms "slow-keystroke" timing for when the legacy preference is engaged for filterableLists. That way, in case someone wants to press, t -- t -- t to go to the third in the list that starts with 't', they will only have to wait 300ms in between presses. - Order the items with front-matching items at the top of the list, and substring-matches below that. =============== Diff against Morphic-cmm.576 =============== Item was changed: ----- Method: PluggableListMorph>>basicKeyPressed: (in category 'model access') ----- basicKeyPressed: aChar | milliseconds slowKeyStroke listSize newSelectionIndex oldSelectionIndex startIndex | oldSelectionIndex := newSelectionIndex := self getCurrentSelectionIndex. listSize := self getListSize. milliseconds := Time millisecondClockValue. slowKeyStroke := (Time milliseconds: milliseconds + since: lastKeystrokeTime) > (self class filterableLists ifTrue: [500] ifFalse: [ 300 ]). - since: lastKeystrokeTime) > 500. lastKeystrokeTime := milliseconds. slowKeyStroke ifTrue: [ "forget previous keystrokes and search in following elements" lastKeystrokes := aChar asLowercase asString. + newSelectionIndex := newSelectionIndex \\ listSize + 1. + self class filterableLists ifTrue: [ list := self getFullList ] ] - newSelectionIndex := newSelectionIndex \\ listSize + 1 ] ifFalse: [ "append quick keystrokes but don't move selection if it still matches" lastKeystrokes := lastKeystrokes , aChar asLowercase asString ]. "No change if model is locked" model okToChange ifFalse: [ ^ self ]. self class filterableLists ifTrue: [ self filterList ; updateList. newSelectionIndex := self modelIndexFor: 1 ] ifFalse: [ startIndex := newSelectionIndex. listSize := self getListSize. [ (self getListItem: newSelectionIndex) asString withBlanksTrimmed asLowercase beginsWith: lastKeystrokes ] whileFalse: [ (newSelectionIndex := newSelectionIndex \\ listSize + 1) = startIndex ifTrue: [ ^ self flash"Not in list." ] ]. newSelectionIndex = oldSelectionIndex ifTrue: [ ^ self flash ] ]. + (self hasFilter and: [(self getCurrentSelectionIndex = newSelectionIndex) not]) ifTrue: - self getCurrentSelectionIndex = newSelectionIndex ifFalse: [self changeModelSelection: newSelectionIndex]! Item was changed: ----- Method: PluggableListMorph>>filterList (in category 'filtering') ----- filterList self hasFilter ifTrue: + [ | frontMatching substringMatching newList | + self indicateFiltered. + frontMatching := OrderedCollection new. + substringMatching := OrderedCollection new. + list withIndexDo: + [ : each : n | | foundPos | + foundPos := each asString + findString: lastKeystrokes + startingAt: 1 + caseSensitive: false. + foundPos = 1 + ifTrue: [ frontMatching add: each ] + ifFalse: + [ foundPos = 0 ifFalse: [ substringMatching add: each ] ] ]. + newList := frontMatching , substringMatching. + newList + ifEmpty: + [ lastKeystrokes := lastKeystrokes allButLast: 1. + self + flash ; + filterList ] + ifNotEmpty: [ list := newList ] ] - [ self indicateFiltered. - list := Array streamContents: - [ : stream | list withIndexDo: - [ : each : n | (each asString - includesSubstring: lastKeystrokes - caseSensitive: false) ifTrue: [ stream nextPut: each ] ] ] ] ifFalse: [ self indicateUnfiltered ]! Item was changed: ----- Method: PluggableListMorph>>update: (in category 'updating') ----- update: aSymbol "Refer to the comment in View|update:." aSymbol == getListSelector ifTrue: [ self updateList. ^ self ]. aSymbol == getIndexSelector ifTrue: [ | uiIndex modelIndex | uiIndex := self uiIndexFor: (modelIndex := self getCurrentSelectionIndex). self selectionIndex: (uiIndex = 0 ifTrue: [ "The filter is preventing us from selecting the item we want - remove it." + (list notNil and: [list size > 0]) ifTrue: [ self removeFilter ]. - list size > 0 ifTrue: [ self removeFilter ]. modelIndex ] ifFalse: [ uiIndex ]). ^ self ]!

1 0

The Trunk: Morphic-cmm.577.mcz
by commits＠source.squeak.org 24 Dec '11

24 Dec '11

1 0

The Trunk: Morphic-cmm.577.mcz
by commits＠source.squeak.org 24 Dec '11

24 Dec '11

1 0

The Trunk: ReleaseBuilder-chc.74.mcz
by commits＠source.squeak.org 22 Dec '11

22 Dec '11

Chris Cunnington uploaded a new version of ReleaseBuilder to project The Trunk: http://source.squeak.org/trunk/ReleaseBuilder-chc.74.mcz ==================== Summary ==================== Name: ReleaseBuilder-chc.74 Author: chc Time: 22 December 2011, 4:18:49.535 pm UUID: 1f18258e-84e3-4635-b0a5-2078133eb8ff Ancestors: ReleaseBuilder-cmm.73 Final spacing for Welcome windows. =============== Diff against ReleaseBuilder-cmm.73 =============== Item was changed: ----- Method: ReleaseBuilderTrunk class>>openWelcomeWorkspaces (in category 'private') ----- openWelcomeWorkspaces TheWorldMainDockingBar instance showWelcomeText: #squeakUserInterface label: 'Squeak User Interface' + in: (40 @ 40 extent: 500 @ 300). - in: (120 @ 120 extent: 500 @ 300). TheWorldMainDockingBar instance showWelcomeText: #workingWithSqueak label: 'Working With Squeak' + in: (80 @ 80 extent: 500 @ 300). - in: (180 @ 180 extent: 500 @ 300). TheWorldMainDockingBar instance showWelcomeText: #licenseInformation label: 'License Information' + in: (120 @ 120 extent: 500 @ 300). - in: (240 @ 240 extent: 500 @ 300). TheWorldMainDockingBar instance showWelcomeText: #welcomeFutureDirections label: 'Future Directions' + in: (160 @ 160 extent: 500 @ 300). - in: (300 @ 300 extent: 500 @ 300). TheWorldMainDockingBar instance showWelcomeText: #welcomeToSqueak43 label: 'Welcome to Squeak 4.3' + in: (200 @ 200 extent: 500 @ 300)! - in: (360 @ 360 extent: 500 @ 300)!

1 0

The Trunk: ReleaseBuilder-chc.74.mcz
by commits＠source.squeak.org 22 Dec '11

22 Dec '11

1 0

The Trunk: ReleaseBuilder-chc.74.mcz
by commits＠source.squeak.org 22 Dec '11

22 Dec '11

1 0

The Trunk: ReleaseBuilder-cmm.73.mcz
by commits＠source.squeak.org 22 Dec '11

22 Dec '11

Chris Muller uploaded a new version of ReleaseBuilder to project The Trunk: http://source.squeak.org/trunk/ReleaseBuilder-cmm.73.mcz ==================== Summary ==================== Name: ReleaseBuilder-cmm.73 Author: cmm Time: 22 December 2011, 1:47:42.618 pm UUID: cf876ee9-97cc-4a2f-99bf-02d2c6955424 Ancestors: ReleaseBuilder-chc.72 - Don't attempt to resize screen until we're using the correct primitives to do so! - Revert standard size to 800x600. =============== Diff against ReleaseBuilder-chc.72 =============== Item was changed: ----- Method: ReleaseBuilderTrunk class>>prepareNewBuild (in category 'scripts') ----- prepareNewBuild "ReleaseBuilderTrunk prepareNewBuild" "Prepare everything that should be done for a new image build" SystemVersion setVersion. SMLoaderPlus setDefaultFilters: (OrderedCollection with: #filterSafelyAvailable). + self setDisplayExtent: 800 @ 600; - self setDisplayExtent: 1024 @ 768; setPreferences; switchTo43Repository; openWelcomeWorkspaces. "Make DependencyBrowser accessible on the open menu." DependencyBrowser initialize. Smalltalk cleanUp: true. Undeclared removeUnreferencedKeys. Smalltalk garbageCollect! Item was changed: ----- Method: ReleaseBuilderTrunk class>>setDisplayExtent: (in category 'private') ----- setDisplayExtent: extent + "Uncomment next line when the primitives become available in the Squeak VM." + " DisplayScreen hostWindowSize: extent." + Display extent = extent ifFalse: [ Warning signal: 'Display extent not set to ', extent ]! - DisplayScreen - depth: 32 - width: extent x - height: extent y - fullscreen: false. - Display extent = extent ifFalse: [ Warning signal: 'Display extent not set to 800@600.' ]!

1 0

The Trunk: ReleaseBuilder-cmm.73.mcz
by commits＠source.squeak.org 22 Dec '11

22 Dec '11

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages December 2011