Packages October 2013

packages@lists.squeakfoundation.org

1 participants
342 discussions

The Trunk: EToys-kfr.90.mcz
by commits＠source.squeak.org 27 Oct '13

27 Oct '13

David T. Lewis uploaded a new version of EToys to project The Trunk: http://source.squeak.org/trunk/EToys-kfr.90.mcz ==================== Summary ==================== Name: EToys-kfr.90 Author: kfr Time: 27 October 2013, 1:20:20.65 pm UUID: d78224f0-2f95-d24e-9975-69477d89a347 Ancestors: EToys-bf.89 Add text alignments to properties panel Remove call to missing addOptionalButtons from properties panel =============== Diff against EToys-bf.89 =============== Item was changed: ----- Method: ObjectPropertiesMorph>>rebuild (in category 'connectors-visual properties') ----- rebuild | buttons | self removeAllMorphs. self addARow: { self lockedString: ('Properties for {1}' translated format: {myTarget name}). }. self addARow: { self inAColumn: { self paneForCornerRoundingToggle. self paneForStickinessToggle. self paneForLockedToggle. }. }. self addARow: { self paneForMainColorPicker. self paneFor2ndGradientColorPicker. }. self addARow: { self paneForBorderColorPicker. self paneForShadowColorPicker. }. buttons := OrderedCollection new. buttons addAll: { self buttonNamed: 'Accept' translated action: #doAccept color: color lighter help: 'keep changes made and close panel' translated. self buttonNamed: 'Cancel' translated action: #doCancel color: color lighter help: 'cancel changes made and close panel' translated. }. + - self addOptionalButtonsTo: buttons. self addARow: buttons. thingsToRevert := Dictionary new. "thingsToRevert at: #fillStyle: put: myTarget fillStyle." myTarget isSystemWindow ifTrue: [ thingsToRevert at: #setWindowColor: put: myTarget paneColorToUse ]. thingsToRevert at: #hasDropShadow: put: myTarget hasDropShadow. thingsToRevert at: #shadowColor: put: myTarget shadowColor. (myTarget respondsTo: #borderColor:) ifTrue: [ thingsToRevert at: #borderColor: put: myTarget borderColor. ]. thingsToRevert at: #borderWidth: put: myTarget borderWidth. thingsToRevert at: #cornerStyle: put: myTarget cornerStyle. thingsToRevert at: #sticky: put: myTarget isSticky. thingsToRevert at: #lock: put: myTarget isLocked. ! Item was added: + ----- Method: TextPropertiesMorph>>alignCenter (in category 'as yet unclassified') ----- + alignCenter + self alignText: #centered.! Item was added: + ----- Method: TextPropertiesMorph>>alignJustified (in category 'as yet unclassified') ----- + alignJustified + self alignText: #justified. + ! Item was added: + ----- Method: TextPropertiesMorph>>alignLeft (in category 'as yet unclassified') ----- + alignLeft + self alignText: #leftFlush. + ! Item was added: + ----- Method: TextPropertiesMorph>>alignRight (in category 'as yet unclassified') ----- + alignRight + self alignText: #rightFlush.! Item was added: + ----- Method: TextPropertiesMorph>>alignText: (in category 'as yet unclassified') ----- + alignText: aSymbol + self applyToWholeText ifTrue: [self activeEditor selectAll]. + self activeEditor setAlignment: aSymbol. + self activeEditor paragraph composeAll. + self activeEditor recomputeSelection. + self activeTextMorph updateFromParagraph. + ! Item was changed: ----- Method: TextPropertiesMorph>>rebuild (in category 'as yet unclassified') ----- rebuild | buttonColor c | self removeAllMorphs. self addAColumn: { self lockedString: ('Text Properties for {1}' translated format:{myTarget name}). }. self addAColumn: { self paneForApplyToWholeText. }. c := self addAColumn: { self activeTextMorph. }. c wrapCentering: #topLeft; color: Color white; borderWidth: 2; borderColor: color darker. self addAColumn: { self paneForTextColorPicker. }. self addARow: { self paneForAutoFitToggle. }. self addARow: { self paneForWrappingToggle. }. self addARow: { self paneForMargins. }. buttonColor := color lighter. self addARow: { self inAColumn: { self addARow: { self buttonNamed: 'Size' translated action: #offerFontMenu color: buttonColor help: 'font changing' translated. self buttonNamed: 'Style' translated action: #changeStyle color: buttonColor help: 'font changing' translated. self buttonNamed: 'N' translated action: #changeToNormalText color: buttonColor help: 'normal text' translated. self buttonNamed: 'B' translated action: #toggleBold color: buttonColor help: 'bold text' translated. self buttonNamed: 'I' translated action: #toggleItalic color: buttonColor help: 'italic text' translated. self buttonNamed: 'n' translated action: #toggleNarrow color: buttonColor help: 'narrow text' translated. self buttonNamed: 'U' translated action: #toggleUnderlined color: buttonColor help: 'underlined text' translated. self buttonNamed: 'S' translated action: #toggleStruckOut color: buttonColor help: 'struck out text' translated. self buttonNamed: 'Kern-' translated action: #kernMinus color: buttonColor help: 'decrease kern' translated. self buttonNamed: 'Kern+' translated action: #kernPlus color: buttonColor help: 'increase kern' translated. }. }. }. self addARow: { self inAColumn: { self addARow: { self + buttonNamed: 'Left flush' translated action: #alignLeft color: buttonColor + help: 'align text to left side' translated. + + self + buttonNamed: 'Center' translated action: #alignCenter color: buttonColor + help: 'align text to center' translated. + self + buttonNamed: 'Right Flush' translated action: #alignRight color: buttonColor + help: 'align text to right side' translated. + self + buttonNamed: 'Justified' translated action: #alignJustified color: buttonColor + help: 'justify text alignmet' translated. + }. + }. + }. + self addARow: { + self inAColumn: { + self addARow: { + self buttonNamed: 'Accept' translated action: #doAccept color: buttonColor help: 'keep changes made and close panel' translated. self buttonNamed: 'Cancel' translated action: #doCancel color: buttonColor help: 'cancel changes made and close panel' translated. }. }. }. !

1 0

The Trunk: EToys-kfr.90.mcz
by commits＠source.squeak.org 27 Oct '13

27 Oct '13

1 0

The Trunk: EToys-kfr.90.mcz
by commits＠source.squeak.org 27 Oct '13

27 Oct '13

1 0

The Trunk: Graphics-nice.276.mcz
by commits＠source.squeak.org 26 Oct '13

26 Oct '13

Nicolas Cellier uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-nice.276.mcz ==================== Summary ==================== Name: Graphics-nice.276 Author: nice Time: 26 October 2013, 11:25:28.113 pm UUID: b79b81d3-ac64-41ba-8eed-2d1104425af4 Ancestors: Graphics-ul.275 Deprecate unused methods from BitBlt 'text display' protocol. Collapse windows in preamble, expand them back in postscript. This is in order to avoid text morph display in the middle of the update. =============== Diff against Graphics-ul.275 =============== Item was added: + (PackageInfo named: 'Graphics') preamble: '"below, add code to be run before the loading of this package" + + "Remember which windows were not collapsed, and collapse them. + The goal is to freeze text morph display during this update. + This is required because displaying may fail and let the system in unusable state." + (Smalltalk globals + at: #''_windows_which_were_not_collapsed'' + put: (World submorphsSatisfying: [:e | (e isKindOf: SystemWindow) + and: [e isCollapsed not]])) + do: [:e | e collapse]. + '! Item was removed: - ----- Method: BitBlt>>displayString:from:to:at:kern:baselineY:font: (in category 'text display') ----- - displayString: aString from: startIndex to: stopIndex at: aPoint kern: kernDelta baselineY: baselineY font: aFont - "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text." - ^ aFont displayString: aString on: self from: startIndex to: stopIndex at: aPoint kern: kernDelta baselineY: baselineY! Item was removed: - ----- Method: BitBlt>>displayString:from:to:at:kern:font: (in category 'text display') ----- - displayString: aString from: startIndex to: stopIndex at: aPoint kern: kernDelta font: aFont - "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text." - ^ aFont displayString: aString on: self from: startIndex to: stopIndex at: aPoint kern: kernDelta! Item was removed: - ----- Method: BitBlt>>installFont:foregroundColor:backgroundColor: (in category 'text display') ----- - installFont: aFont foregroundColor: foregroundColor backgroundColor: backgroundColor - "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text." - ^aFont installOn: self foregroundColor: foregroundColor backgroundColor: backgroundColor! Item was changed: (PackageInfo named: 'Graphics') postscript: '"below, add code to be run after the loading of this package" + + "Restore the collapsed window that were not" + (Smalltalk globals removeKey: #''_windows_which_were_not_collapsed'') + reverseDo: [:e | e expand].'! - "Migrate the actual preference values to the new pragma preferences." - BitBlt classPool - at: #SubPixelRenderFonts put: Preferences subPixelRenderFonts; - at: #SubPixelRenderColorFonts put: Preferences subPixelRenderColorFonts'!

1 0

The Trunk: Graphics-nice.276.mcz
by commits＠source.squeak.org 26 Oct '13

26 Oct '13

1 0

The Trunk: Graphics-nice.276.mcz
by commits＠source.squeak.org 26 Oct '13

26 Oct '13

1 0

The Trunk: 45Deprecated-nice.11.mcz
by commits＠source.squeak.org 26 Oct '13

26 Oct '13

Nicolas Cellier uploaded a new version of 45Deprecated to project The Trunk: http://source.squeak.org/trunk/45Deprecated-nice.11.mcz ==================== Summary ==================== Name: 45Deprecated-nice.11 Author: nice Time: 26 October 2013, 10:45:56.53 pm UUID: e5064650-ce13-4c4e-8a8a-af2df4838ac6 Ancestors: 45Deprecated-nice.10 Deprecate unused methods from BitBlt 'text display' protocol. =============== Diff against 45Deprecated-nice.10 =============== Item was added: + ----- Method: BitBlt>>displayString:from:to:at:kern:baselineY:font: (in category '*45Deprecated') ----- + displayString: aString from: startIndex to: stopIndex at: aPoint kern: kernDelta baselineY: baselineY font: aFont + "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text." + ^ aFont displayString: aString on: self from: startIndex to: stopIndex at: aPoint kern: kernDelta baselineY: baselineY! Item was added: + ----- Method: BitBlt>>displayString:from:to:at:kern:font: (in category '*45Deprecated') ----- + displayString: aString from: startIndex to: stopIndex at: aPoint kern: kernDelta font: aFont + "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text." + ^ aFont displayString: aString on: self from: startIndex to: stopIndex at: aPoint kern: kernDelta! Item was added: + ----- Method: BitBlt>>installFont:foregroundColor:backgroundColor: (in category '*45Deprecated') ----- + installFont: aFont foregroundColor: foregroundColor backgroundColor: backgroundColor + "Double dispatch into the font. This method is present so that other-than-bitblt entities can be used by CharacterScanner and friends to display text." + ^aFont installOn: self foregroundColor: foregroundColor backgroundColor: backgroundColor!

1 0

The Trunk: 45Deprecated-nice.11.mcz
by commits＠source.squeak.org 26 Oct '13

26 Oct '13

1 0

The Trunk: 45Deprecated-nice.11.mcz
by commits＠source.squeak.org 26 Oct '13

26 Oct '13

1 0

The Trunk: Kernel-cmm.816.mcz
by commits＠source.squeak.org 26 Oct '13

26 Oct '13

Chris Muller uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-cmm.816.mcz ==================== Summary ==================== Name: Kernel-cmm.816 Author: cmm Time: 26 October 2013, 2:55:06.697 pm UUID: 62af959d-4b3e-4b4c-8c4e-aa7f1465e8de Ancestors: Kernel-ul.815 Remove valueWithAllPossibleArguments: because it has not proven a general necessity.. =============== Diff against Kernel-ul.815 =============== Item was removed: - ----- Method: BlockClosure>>valueWithAllPossibleArguments: (in category 'evaluating') ----- - valueWithAllPossibleArguments: anArray - "Same as valueWithPossibleArgs: except when the receiver takes just one-argument, and more than one argument is specified by anArray, then pass all of anArray as THE argument to the receiver block - This is used to allow a large, variable number of arguments to be passed." - ^numArgs = 0 - ifTrue: [self value] - ifFalse: - [self valueWithArguments: - (numArgs = anArray size - ifTrue: [anArray] - ifFalse: - [numArgs > anArray size - ifTrue: [anArray, (Array new: numArgs - anArray size)] - ifFalse: - [numArgs = 1 - ifTrue: [Array with: anArray] - ifFalse: [anArray copyFrom: 1 to: numArgs]]])]!

1 0

← Newer
1
2
3
4
5
6
7
...
35
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 October 2013