Packages August 2012

packages@lists.squeakfoundation.org

1 participants
123 discussions

The Trunk: Tests-cwp.159.mcz
by commits＠source.squeak.org 17 Aug '12

17 Aug '12

Colin Putney uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-cwp.159.mcz ==================== Summary ==================== Name: Tests-cwp.159 Author: cwp Time: 14 August 2012, 10:33:15.982 am UUID: b081e01e-3063-4d7f-9804-eda9b599c6a8 Ancestors: Tests-cwp.158 Infix selectors can't include underscores, so remove those tests, and add one that ensures that a single underscore is considered a unary message. =============== Diff against Tests-cwp.157 =============== Item was added: + ----- Method: UnderscoreSelectorsTest>>assertSelector:hasPrecedence: (in category 'support') ----- + assertSelector: aSymbol hasPrecedence: expected + | actual | + actual := aSymbol precedence. + self assert: actual = expected! Item was changed: + ----- Method: UnderscoreSelectorsTest>>pref:during: (in category 'support') ----- - ----- Method: UnderscoreSelectorsTest>>pref:during: (in category 'as yet unclassified') ----- pref: aBoolean during: aBlock | tmp | tmp := Scanner prefAllowUnderscoreSelectors. [Scanner prefAllowUnderscoreSelectors: aBoolean. aBlock value] ensure: [Scanner prefAllowUnderscoreSelectors: tmp].! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP1InternalUnderscore (in category 'tests') ----- + testP1InternalUnderscore + + self + assertSelector: #'is_symbol' + hasPrecedence: 1. + ! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP1LeadingUnderscore (in category 'tests') ----- + testP1LeadingUnderscore + self + assertSelector: #'_isSymbol' + hasPrecedence: 1. + ! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP1SingleUnderscore (in category 'tests') ----- + testP1SingleUnderscore + self + assertSelector: #'_' + hasPrecedence: 1! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP1Traditional (in category 'tests') ----- + testP1Traditional + self + assertSelector: #isSymbol + hasPrecedence: 1! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP1TrailingUnderscore (in category 'tests') ----- + testP1TrailingUnderscore + self + assertSelector: #'isSymbol_' + hasPrecedence: 1! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP2Traditional (in category 'tests') ----- + testP2Traditional + self + assertSelector: #+ + hasPrecedence: 2! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP3InternalUnderscore (in category 'tests') ----- + testP3InternalUnderscore + self + assertSelector: #'with_value:' + hasPrecedence: 3! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP3LeadingUnderscore (in category 'tests') ----- + testP3LeadingUnderscore + self + assertSelector: #'_value:' + hasPrecedence: 3! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP3Traditional (in category 'tests') ----- + testP3Traditional + self + assertSelector: #value: + hasPrecedence: 3! Item was added: + ----- Method: UnderscoreSelectorsTest>>testP3TrailingUnderscore (in category 'tests') ----- + testP3TrailingUnderscore + self + assertSelector: #'value_:' + hasPrecedence: 3! Item was removed: - ----- Method: UnderscoreSelectorsTest>>testPrefFalse (in category 'as yet unclassified') ----- - testPrefFalse - self pref: false during: [self deny: $_ tokenish].! Item was removed: - ----- Method: UnderscoreSelectorsTest>>testPrefTrue (in category 'as yet unclassified') ----- - testPrefTrue - self pref: true during: [self assert: $_ tokenish].! Item was added: + ----- Method: UnderscoreSelectorsTest>>testTokenishFalse (in category 'tests') ----- + testTokenishFalse + self pref: false during: [self deny: $_ tokenish].! Item was added: + ----- Method: UnderscoreSelectorsTest>>testTokenishTrue (in category 'tests') ----- + testTokenishTrue + self pref: true during: [self assert: $_ tokenish].!

1 0

The Trunk: Tests-cwp.159.mcz
by commits＠source.squeak.org 17 Aug '12

17 Aug '12

1 0

The Trunk: Tests-eem.158.mcz
by commits＠source.squeak.org 17 Aug '12

17 Aug '12

Eliot Miranda uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-eem.158.mcz ==================== Summary ==================== Name: Tests-eem.158 Author: eem Time: 16 August 2012, 8:41:31.717 pm UUID: e5f89646-94d8-4b8f-b851-266fd720b7ec Ancestors: Tests-cwp.157 Add a test that tests outer in the contex of an enclosing handler, unlike testResumableOuter which tests outer in the absence of an enclosing handler. =============== Diff against Tests-cwp.157 =============== Item was added: + ----- Method: ExceptionTests>>testOuter (in category 'testing-outer') ----- + testOuter + | result | + result := [[Notification signal. #signal] + on: Notification + do: [:ex| ex outer. #inner]] + on: Notification + do: [:ex| #outer]. + self assert: result = #outer!

1 0

The Trunk: Tests-eem.158.mcz
by commits＠source.squeak.org 17 Aug '12

17 Aug '12

1 0

The Trunk: Tests-eem.158.mcz
by commits＠source.squeak.org 17 Aug '12

17 Aug '12

1 0

The Trunk: Morphic-cmm.622.mcz
by commits＠source.squeak.org 16 Aug '12

16 Aug '12

Chris Muller uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-cmm.622.mcz ==================== Summary ==================== Name: Morphic-cmm.622 Author: cmm Time: 9 August 2012, 8:14:27.696 pm UUID: 2c07775c-face-4d3f-bcb0-2c230163bb41 Ancestors: Morphic-bf.621 Reduce, by one, the number of keystrokes required to exit Squeak without saving the image. The N key will now work. =============== Diff against Morphic-bf.621 =============== Item was changed: AlignmentMorph subclass: #UserDialogBoxMorph + instanceVariableNames: 'titleMorph labelMorph buttonRow value selectedButton cancelButton timeout savedLabel keyMap' - instanceVariableNames: 'titleMorph labelMorph buttonRow value selectedButton cancelButton timeout savedLabel' classVariableNames: '' poolDictionaries: '' category: 'Morphic-Windows'! !UserDialogBoxMorph commentStamp: 'ar 12/11/2009 22:33' prior: 0! A DialogBoxMorph is Morph used in simple yes/no/confirm dialogs. Strongly modal.! Item was changed: ----- Method: UserDialogBoxMorph>>addButton:value:selected:performActionOnEscape: (in category 'constructing') ----- + addButton: buttonLabel value: buttonValue selected: isSelected performActionOnEscape: performActionOnEscape - addButton: buttonLabel value: buttonValue selected: isSelected performActionOnEscape: performActionOnEscape "Adds a button with the given label and value. The value is returned if the user presses the button." | button | + button := PluggableButtonMorphPlus new + label: buttonLabel ; + action: [ self closeDialog: buttonValue ] ; + color: self buttonColor twiceLighter. - button := PluggableButtonMorphPlus new. - button label: buttonLabel. - button action:[self closeDialog: buttonValue]. - button color: self buttonColor twiceLighter. isSelected ifTrue: [ self selectButton: button ]. + performActionOnEscape ifTrue: [ self performActionOnEscapeOf: button ]. + self registerKeyFor: button. + buttonRow addMorphBack: button! - performActionOnEscape ifTrue: [ self performActionOnEscapeOf: button ]. - buttonRow addMorphBack: button. - ! Item was added: + ----- Method: UserDialogBoxMorph>>checkAgainstKeymap: (in category 'events') ----- + checkAgainstKeymap: aCharacter + keyMap + at: aCharacter asLowercase + ifPresent: [ : foundButton | foundButton performAction ] + ifAbsent: [ "do nothing" ]! Item was changed: ----- Method: UserDialogBoxMorph>>initialize (in category 'initialization') ----- initialize | titleRow titleFill cc | super initialize. self color: Color white. self listDirection: #topToBottom; wrapCentering: #center; hResizing: #shrinkWrap; vResizing: #shrinkWrap. self layoutInset: 0@0; cellInset: 5@5. self borderStyle: BorderStyle thinGray. self useRoundedCorners; addDropShadow; shadowColor: (TranslucentColor r: 0.0 g: 0.0 b: 0.0 alpha: 0.666); shadowOffset: 1 @ 1. cc := Color gray: 0.8. titleRow := AlignmentMorph newRow. titleRow hResizing: #spaceFill; vResizing: #shrinkWrap. titleRow layoutInset: 2@5. titleRow color: cc. titleFill := GradientFillStyle ramp: {0.0 -> Color white. 1 ->cc}. titleFill radial: false; origin: titleRow topLeft; direction: 0 @ TextStyle defaultFont height. titleRow fillStyle: titleFill. titleRow fillStyle: self titleGradient. titleMorph := StringMorph new. titleMorph emphasis: 1. titleRow addMorph: titleMorph. labelMorph := TextMorph new. labelMorph margins: 5@5. labelMorph lock. buttonRow := AlignmentMorph newRow vResizing: #shrinkWrap. buttonRow hResizing: #shrinkWrap; layoutInset: 5@5; cellInset: 5@5. buttonRow color: Color transparent. + self + addMorphBack: titleRow ; + addMorphBack: labelMorph ; + addMorphBack: buttonRow ; + addDropShadow. + keyMap := Dictionary new! - self addMorphBack: titleRow. - self addMorphBack: labelMorph. - self addMorphBack: buttonRow. - self addDropShadow.! Item was changed: ----- Method: UserDialogBoxMorph>>keyStroke: (in category 'events') ----- keyStroke: evt | evtCharacter | self stopAutoTrigger. evtCharacter := evt keyCharacter. evtCharacter = Character escape ifTrue: [ ^cancelButton ifNotNil: [ cancelButton performAction ] ]. evtCharacter = Character cr ifTrue: [ ^selectedButton ifNotNil: [ selectedButton performAction ] ]. (evtCharacter = Character arrowLeft or: [ evt shiftPressed and: [ evtCharacter = Character tab ] ]) ifTrue: [ ^self selectPreviousButton ]. (evtCharacter = Character arrowRight or: [ evtCharacter = Character tab ]) ifTrue: [ + ^self selectNextButton ]. + self checkAgainstKeymap: evtCharacter! - ^self selectNextButton ].! Item was added: + ----- Method: UserDialogBoxMorph>>registerKeyFor: (in category 'constructing') ----- + registerKeyFor: button + button label do: + [ : eachChar | eachChar isAlphaNumeric ifTrue: + [ keyMap + at: eachChar asLowercase + ifPresent: [ : found | "It's already taken, don't use it." ] + ifAbsent: + [ ^ keyMap + at: eachChar asLowercase + put: button ] ] ]!

1 0

The Trunk: Morphic-cmm.622.mcz
by commits＠source.squeak.org 16 Aug '12

16 Aug '12

1 0

The Trunk: Morphic-cmm.622.mcz
by commits＠source.squeak.org 16 Aug '12

16 Aug '12

1 0

The Trunk: Monticello-cmm.521.mcz
by commits＠source.squeak.org 16 Aug '12

16 Aug '12

Chris Muller uploaded a new version of Monticello to project The Trunk: http://source.squeak.org/trunk/Monticello-cmm.521.mcz ==================== Summary ==================== Name: Monticello-cmm.521 Author: cmm Time: 16 August 2012, 2:55:31.736 pm UUID: 833ce767-45cc-47f4-9472-00a892ba6a39 Ancestors: Monticello-cmm.520 - Fix MCFileBasedRepository>>#includesVersionNamed:. - Fix access to non-FileBased repositories since #allPackageAndBranchNames was introduced. =============== Diff against Monticello-cmm.520 =============== Item was changed: ----- Method: MCFileBasedRepository>>includesVersionNamed: (in category 'versions') ----- + includesVersionNamed: aString + | comparable | + comparable := ((aString endsWith: '.mcz') and: [ aString size > 4 ]) + ifTrue: + [ aString + copyFrom: 1 + to: aString size - 4 ] + ifFalse: [ aString ]. + ^ self allVersionNames includes: comparable! - includesVersionNamed: aString - ^ self allVersionNames includes: aString asMCVersionName! Item was added: + ----- Method: MCRepository>>allPackageAndBranchNames (in category 'packages') ----- + allPackageAndBranchNames + "Currently this function is only supported by FileBased repositories." + ^ self allPackageNames!

1 0

The Trunk: Monticello-cmm.521.mcz
by commits＠source.squeak.org 16 Aug '12

16 Aug '12

1 0

← Newer
1
2
3
4
5
6
7
8
...
13
Older →

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages August 2012