Squeak-dev September 2011

squeak-dev@lists.squeakfoundation.org

64 participants
208 discussions

The Trunk: Collections-eem.460.mcz
by commits＠source.squeak.org 29 Sep '11

29 Sep '11

Eliot Miranda uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-eem.460.mcz ==================== Summary ==================== Name: Collections-eem.460 Author: eem Time: 29 September 2011, 12:42:36.39 pm UUID: 0b90a58f-9354-4927-91f0-3432359541fe Ancestors: Collections-ul.459 Fix String>numArgs for prefAllowUnderscoreSelectors regime. =============== Diff against Collections-ul.459 =============== Item was changed: ----- Method: String>>numArgs (in category 'accessing') ----- numArgs "Answer either the number of arguments that the receiver would take if considered a selector. Answer -1 if it couldn't be a selector. Note that currently this will answer -1 for anything begining with an uppercase letter even though the system will accept such symbols as selectors. It is intended mostly for the assistance of spelling correction." | firstChar numColons excess start ix | self size = 0 ifTrue: [^ -1]. firstChar := self at: 1. (firstChar isLetter or: [firstChar = $:]) ifTrue: ["Fast reject if any chars are non-alphanumeric NOTE: fast only for Byte things - Broken for Wide" + Scanner prefAllowUnderscoreSelectors ifFalse: + [self class isBytes + ifTrue: [(self findSubstring: '~' in: self startingAt: 1 matchTable: Tokenish) > 0 ifTrue: [^ -1]] + ifFalse: [2 to: self size do: [:i | (self at: i) tokenish ifFalse: [^ -1]]]]. - self class isBytes - ifTrue: [(self findSubstring: '~' in: self startingAt: 1 matchTable: Tokenish) > 0 ifTrue: [^ -1]] - ifFalse: [2 to: self size do: [:i | (self at: i) tokenish ifFalse: [^ -1]]]. "Fast colon count" numColons := 0. start := 1. [(ix := self indexOf: $: startingAt: start) > 0] whileTrue: [numColons := numColons + 1. start := ix + 1]. numColons = 0 ifTrue: [^ 0]. firstChar = $: ifTrue: [excess := 2 "Has an initial keyword, as #:if:then:else:"] ifFalse: [excess := 0]. self last = $: ifTrue: [^ numColons - excess] ifFalse: [^ numColons - excess - 1 "Has a final keywords as #nextPut::andCR"]]. firstChar isSpecial ifTrue: [self size = 1 ifTrue: [^ 1]. 2 to: self size do: [:i | (self at: i) isSpecial ifFalse: [^ -1]]. ^ 1]. ^ -1.!

1 0

loading configurations into the Monticello Configurations browser whitewash...
by Eliot Miranda 29 Sep '11

29 Sep '11

Hi All, right now this is a non-obvious process. Open up the Monticello Browser, select a repository (typically where the image is updated from), scroll down to updates, select an update, select Browse. Given that we have the update URL in the image (MCMcmUpdater class>>defaultUpdateURL) which couldn't it be something like 1. Open up Monticello Configurations 2. push a "Browse Latest Repository Configuration" button (say "Load Latest") that would be enabled if the update URL was set? If this is a good idea anyone care to implement it ;) ? -- best, Eliot

1 1

The Trunk: Morphic-bf.581.mcz
by commits＠source.squeak.org 29 Sep '11

29 Sep '11

Bert Freudenberg uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-bf.581.mcz ==================== Summary ==================== Name: Morphic-bf.581 Author: bf Time: 29 September 2011, 11:14:17.625 am UUID: 65441674-ca6b-4ad5-8a86-9d163816efd7 Ancestors: Morphic-dtl.580 Fix keyDown/keyUp events. Must not be interpreted. =============== Diff against Morphic-dtl.580 =============== Item was changed: ----- Method: HandMorph>>generateKeyboardEvent: (in category 'private events') ----- generateKeyboardEvent: evtBuf "Generate the appropriate mouse event for the given raw event buffer" + | buttons modifiers type pressType stamp keyValue | - | buttons modifiers type pressType stamp char | stamp := evtBuf second. stamp = 0 ifTrue: [stamp := Time millisecondClockValue]. pressType := evtBuf fourth. pressType = EventKeyDown ifTrue: [type := #keyDown]. pressType = EventKeyUp ifTrue: [type := #keyUp]. pressType = EventKeyChar ifTrue: [type := #keystroke]. modifiers := evtBuf fifth. buttons := (modifiers bitShift: 3) bitOr: (lastMouseEvent buttons bitAnd: 7). + type = #keystroke + ifTrue: [keyValue := (self keyboardInterpreter nextCharFrom: Sensor firstEvt: evtBuf) asInteger] + ifFalse: [keyValue := evtBuf third]. - char := self keyboardInterpreter nextCharFrom: Sensor firstEvt: evtBuf. ^ KeyboardEvent new setType: type buttons: buttons position: self position + keyValue: keyValue - keyValue: char asciiValue hand: self stamp: stamp. !

1 0

Re: [squeak-dev] The Trunk: ToolBuilder-Kernel-dtl.51.mcz
by David T. Lewis 29 Sep '11

29 Sep '11

I moved four related packages for this update to trunk, and moved the prior inbox versions to treated. For reference, the attach change set contains the updates to all four packages. If anyone disagrees with the update, revert the changes in this change set. Following the update, you can open a new browser and the differences that you will see are: - If you have the rounded buttons preference enabled, browser buttons will be rounded but the button labeled "source" will be square. - If you have the rounded buttons preference disabled, browser buttons will be square but the button labeled "source" will be rounded. - If you click the "source" button and change the selection to e.g. "byteCodes", the button label will change to reflect the new setting. This is intended to restore behavior similar to Squeak 3.8 that could not be supported in ToolBuilder until now. Dave On Wed, Sep 28, 2011 at 11:46:18PM +0000, commits(a)source.squeak.org wrote: > David T. Lewis uploaded a new version of ToolBuilder-Kernel to project The Trunk: > http://source.squeak.org/trunk/ToolBuilder-Kernel-dtl.51.mcz > > ==================== Summary ==================== > > Name: ToolBuilder-Kernel-dtl.51 > Author: dtl > Time: 28 September 2011, 7:46:21.041 pm > UUID: 16fa4b50-f267-4772-bc5e-c1af7472cde0 > Ancestors: ToolBuilder-Kernel-cmm.49 > > Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). > > Changes are in four packages. > > ToolBuilder-Kernel: > - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. > - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. > > ToolBuilder-Morphic: > - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. > - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. > > Tools: > - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. > > Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. > > Morphic: > - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). > - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). >

2 1

Re: Developing on virtualized Android
by Dimitry Golubovsky 29 Sep '11

29 Sep '11

Hi, On Tue, Sep 13, 2011 at 9:53 AM, Torsten Bergmann <astares(a)gmx.de> wrote: > Hi Dimitry, > > did you try Pharo/Squeak for android on Android x86 and virtualbox (without a device) > > http://androidspin.com/2011/01/24/howto-install-android-x86-2-2-in-virtualb… > > Is there a short howto? Would be nice for people to play with > it even without an android device... > Now I found some time to investigate this, and got some success. I was able to run the following application: http://squeakvm-tablet.googlecode.com/files/CogDroid86-alpha-20110928.apk under this version of Android-x86: http://android-x86.googlecode.com/files/android-x86-2.3-RC1-eeepc.iso (or check their downloads page: http://code.google.com/p/android-x86/downloads/list - each netbook-specific ISO has its own set of drivers, and something may not be provided by KVM or any other virtualizer). Do not use the 2.2-generic ISO - it has many problems. Brief howto for KVM: 1. Create a virtual image for "hard disk" to use with KVM. Boot from the ISO image. For network adapter, specify "pcnet": -net nic,model=pcnet eeepc ISO does not have a driver for say rtl8139 2. After you see that the ISO boots, install on "hard disk". You will be given an option to create a fake sdcard: say Yes. SD card image will be allocated within the KVM's "hard disk". Select ext2 or ext3 as hard disk filesystem. 3. Install grub when asked. Later, if you need to edit grub boot menu, do this: In KVM, press Alt-LeftArrow to get to the root console. Mount the boot disk (unlike typical Linux, there is no boot volume mounted implicitly) mkdir /data/fs mount -t ext3 /dev/block/sda1 /data/fs vi /data/fs/grub/menu.lst umount /data/fs reboot 4. Install AndroZip application, otherwise you will not be able to download zip files 5. Install some file manager (2.3 seems to already have OpenIntents file manager installed) 6. Download the zipped Squeak image+changes+sources: http://squeakvm-tablet.googlecode.com/files/sqandr_pres.zip or whatever other image you would like Unzip the zipfile (tap on it; it will be unzipped under /mnt/sdcard/AndroZip) 7. Install CogDroid alpha mentioned above. When started, it will display usual list of images to boot. I got the following benchmark: 85,906,040 bytecodes/sec, 5,183,202 sends/sec. Emulator's /proc/cpuinfo says QEMU Virtual CPU version 0.9.1, 1986 MHz, 3973 bogomips. It runs under physical CPU: processor : 0 vendor_id : AuthenticAMD cpu family : 15 model : 75 model name : AMD Athlon(tm) 64 X2 Dual Core Processor 3800+ stepping : 2 cpu MHz : 1999.903 cache size : 512 KB bogomips : 3999.80 8. Note on mouse buttons: Left click acts as screen tap (long click is long tap, e. g. on home screen use it to move/delete shortcut icons). CogDroid does not distinguish between long and short taps. Right click acts as the "Back" hardware button. So, to "Print-it": right click, see "Mouse yellow" popup, left click brings up menu, select Print. Middle click (press on the scroll wheel) acts as "Menu" button (to bring on the onscreen keyboard, but you can use the physical one ;) No way to do the Blue click (I use the "Forward" button on Pandigital, but it seems not to be typically available). So if you want to try Pharo, remap mouse buttons if possible. Hope this information is useful. Adjust to your virtualizer ;) Thanks.

1 0

Form - fill area with a TranslucentColor
by Jonathan Mullins 29 Sep '11

29 Sep '11

Hi all, I'm trying to fill areas on a Form object with different TranslucentColors using Form fill:fillColor:, however the areas always get filled with solid colours, ignoring the alpha values altogether. I've tried the different fill modes with no success. The form is initialised with a 32 bit depth. Any ideas? I'm using Squeak 2.8 (I think… it's the MIT Scratch image). Cheers, Jonathan

3 3

Daily Commit Log
by commits＠source.squeak.org 29 Sep '11

29 Sep '11

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2011-September/005002.… Name: Tools-dtl.381 Ancestors: Tools-eem.380 Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). Changes are in four packages. ToolBuilder-Kernel: - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. ToolBuilder-Morphic: - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. Tools: - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. Morphic: - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-September/005003.… Name: ToolBuilder-Morphic-dtl.81 Ancestors: ToolBuilder-Morphic-ul.79 Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). Changes are in four packages. ToolBuilder-Kernel: - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. ToolBuilder-Morphic: - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. Tools: - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. Morphic: - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-September/005004.… Name: ToolBuilder-Kernel-dtl.51 Ancestors: ToolBuilder-Kernel-cmm.49 Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). Changes are in four packages. ToolBuilder-Kernel: - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. ToolBuilder-Morphic: - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. Tools: - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. Morphic: - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-September/005005.… Name: Morphic-dtl.580 Ancestors: Morphic-laza.577 Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). Changes are in four packages. ToolBuilder-Kernel: - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. ToolBuilder-Morphic: - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. Tools: - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. Morphic: - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). =============================================

1 0

The Trunk: Morphic-dtl.580.mcz
by commits＠source.squeak.org 29 Sep '11

29 Sep '11

David T. Lewis uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-dtl.580.mcz ==================== Summary ==================== Name: Morphic-dtl.580 Author: dtl Time: 28 September 2011, 7:46:36.995 pm UUID: 19e16a78-9d05-43aa-aa56-5716c8c91397 Ancestors: Morphic-laza.577 Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). Changes are in four packages. ToolBuilder-Kernel: - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. ToolBuilder-Morphic: - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. Tools: - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. Morphic: - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). =============== Diff against Morphic-laza.577 =============== Item was changed: AlignmentMorph subclass: #PluggableButtonMorph + instanceVariableNames: 'model label getStateSelector actionSelector getLabelSelector getMenuSelector shortcutCharacter askBeforeChanging triggerOnMouseDown offColor onColor feedbackColor showSelectionFeedback allButtons arguments argumentsProvider argumentsSelector style' - instanceVariableNames: 'model label getStateSelector actionSelector getLabelSelector getMenuSelector shortcutCharacter askBeforeChanging triggerOnMouseDown offColor onColor feedbackColor showSelectionFeedback allButtons arguments argumentsProvider argumentsSelector' classVariableNames: 'RoundedButtonCorners' poolDictionaries: '' category: 'Morphic-Pluggable Widgets'! !PluggableButtonMorph commentStamp: '<historical>' prior: 0! A PluggableButtonMorph is a combination of an indicator for a boolean value stored in its model and an action button. The action of a button is often, but not always, to toggle the boolean value that it shows. Its pluggable selectors are: getStateSelector fetch a boolean value from the model actionSelector invoke this button's action on the model getLabelSelector fetch this button's lable from the model getMenuSelector fetch a pop-up menu for this button from the model Any of the above selectors can be nil, meaning that the model does not supply behavior for the given action, and the default behavior should be used. For example, if getStateSelector is nil, then this button shows the state of a read-only boolean that is always false. The model informs its view(s) of changes by sending #changed: to itself with getStateSelector as a parameter. The view tells the model when the button is pressed by sending actionSelector. If the actionSelector takes one or more arguments, then the following are relevant: arguments A list of arguments to provide when the actionSelector is called. argumentsProvider The object that is sent the argumentSelector to obtain arguments, if dynamic argumentsSelector The message sent to the argumentProvider to obtain the arguments. Options: askBeforeChanging have model ask user before allowing a change that could lose edits triggerOnMouseDown do this button's action on mouse down (vs. up) transition shortcutCharacter a place to record an optional shortcut key ! Item was changed: ----- Method: PluggableButtonMorph>>drawOn: (in category 'drawing') ----- drawOn: aCanvas | cc gradient borderColor | cc := self color. cc isTransparent ifTrue:[cc := Color gray: 0.9]. self enabled ifFalse:[cc := Color lightGray]. cc brightness > 0.9 ifTrue:[cc := cc adjustBrightness: 0.9 - cc brightness]. showSelectionFeedback ifTrue:[ borderColor := cc muchDarker. gradient := GradientFillStyle ramp: { 0.0 -> cc muchDarker. 0.1-> (cc adjustBrightness: -0.2). 0.5 -> cc. 0.9-> (cc adjustBrightness: -0.1). 1 -> cc muchDarker. }. ] ifFalse:[ borderColor := Color lightGray. gradient := GradientFillStyle ramp: { 0.0 -> Color white. 0.1-> (cc adjustBrightness: 0.05). 0.6 -> (cc darker). } ]. gradient origin: bounds topLeft. gradient direction: 0@self height. + ^ self roundedButtonCorners - ^ self class roundedButtonCorners ifTrue: [aCanvas frameAndFillRoundRect: bounds radius: 8 fillStyle: gradient borderWidth: 1 borderColor: borderColor] ifFalse: [aCanvas frameAndFillRectangle: self innerBounds fillColor: gradient asColor borderWidth: 1 borderColor: borderColor darker; fillRectangle: (self innerBounds insetBy: 1) fillStyle: gradient]! Item was added: + ----- Method: PluggableButtonMorph>>roundedButtonCorners (in category 'drawing') ----- + roundedButtonCorners + "If the button is intended to invoke a menu for selection, provide a visual + distinction by inverting the rounded corners attribute." + ^self class roundedButtonCorners + xor: style == #menuButton! Item was added: + ----- Method: PluggableButtonMorph>>style (in category 'accessing') ----- + style + "Treat aSymbol as a hint to modify the button appearance." + ^style + ! Item was added: + ----- Method: PluggableButtonMorph>>style: (in category 'accessing') ----- + style: aSymbol + "Use aSymbol as a hint to modify the button appearance." + style := aSymbol + ! Item was changed: ----- Method: PluggableButtonMorph>>veryDeepInner: (in category 'copying') ----- veryDeepInner: deepCopier "Copy all of my instance variables. Some need to be not copied at all, but shared. Warning!!!! Every instance variable defined in this class must be handled. We must also implement veryDeepFixupWith:. See DeepCopier class comment." super veryDeepInner: deepCopier. "model := model. Weakly copied" label := label veryDeepCopyWith: deepCopier. "getStateSelector := getStateSelector. a Symbol" "actionSelector := actionSelector. a Symbol" "getLabelSelector := getLabelSelector. a Symbol" "getMenuSelector := getMenuSelector. a Symbol" shortcutCharacter := shortcutCharacter veryDeepCopyWith: deepCopier. askBeforeChanging := askBeforeChanging veryDeepCopyWith: deepCopier. triggerOnMouseDown := triggerOnMouseDown veryDeepCopyWith: deepCopier. offColor := offColor veryDeepCopyWith: deepCopier. onColor := onColor veryDeepCopyWith: deepCopier. feedbackColor := feedbackColor veryDeepCopyWith: deepCopier. showSelectionFeedback := showSelectionFeedback veryDeepCopyWith: deepCopier. allButtons := nil. "a cache" arguments := arguments veryDeepCopyWith: deepCopier. argumentsProvider := argumentsProvider veryDeepCopyWith: deepCopier. + "argumentsSelector := argumentsSelector. a Symbol" + style := style. "a Symbol"! - argumentsSelector := argumentsSelector. " a Symbol" !

1 0

The Trunk: ToolBuilder-Kernel-dtl.51.mcz
by commits＠source.squeak.org 29 Sep '11

29 Sep '11

David T. Lewis uploaded a new version of ToolBuilder-Kernel to project The Trunk: http://source.squeak.org/trunk/ToolBuilder-Kernel-dtl.51.mcz ==================== Summary ==================== Name: ToolBuilder-Kernel-dtl.51 Author: dtl Time: 28 September 2011, 7:46:21.041 pm UUID: 16fa4b50-f267-4772-bc5e-c1af7472cde0 Ancestors: ToolBuilder-Kernel-cmm.49 Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). Changes are in four packages. ToolBuilder-Kernel: - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. ToolBuilder-Morphic: - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. Tools: - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. Morphic: - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). =============== Diff against ToolBuilder-Kernel-cmm.49 =============== Item was changed: PluggableButtonSpec subclass: #PluggableActionButtonSpec instanceVariableNames: '' classVariableNames: '' poolDictionaries: '' category: 'ToolBuilder-Kernel'! + !PluggableActionButtonSpec commentStamp: 'dtl 9/19/2011 07:51' prior: 0! + PluggableActionButtonSpec is intended as a HINT for the builder that this widget will be used as push (action) button. Unless explicitly supported it will be automatically substituted by PluggableButton.! - !PluggableActionButtonSpec commentStamp: 'ar 2/12/2005 23:12' prior: 0! - PluggableActionButtonSpec is intentded as a HINT for the builder that this widget will be used as push (action) button. Unless explicitly supported it will be automatically substituted by PluggableButton.! Item was changed: PluggableWidgetSpec subclass: #PluggableButtonSpec + instanceVariableNames: 'action label state enabled style changeLabelWhen' - instanceVariableNames: 'action label state enabled' classVariableNames: '' poolDictionaries: '' category: 'ToolBuilder-Kernel'! !PluggableButtonSpec commentStamp: 'ar 2/11/2005 21:57' prior: 0! A button, both for firing as well as used in radio-button style (e.g., carrying a selection). Instance variables: action <Symbol> The action to perform when the button is fired. label <Symbol|String> The selector for retrieving the button's label or label directly. state <Symbol> The selector for retrieving the button's selection state. enabled <Symbo> The selector for retrieving the button's enabled state. color <Symbo> The selector for retrieving the button color. help <String> The balloon help for the button.! Item was added: + ----- Method: PluggableButtonSpec>>changeLabelWhen (in category 'accessing') ----- + changeLabelWhen + "When handled in in an update: handler, treat this symbol as notification + that the button label should be updated." + ^changeLabelWhen! Item was added: + ----- Method: PluggableButtonSpec>>changeLabelWhen: (in category 'accessing') ----- + changeLabelWhen: aSymbol + "When the button handles aSymbol in its update: handler, treat it + as notification that the button label should be updated." + changeLabelWhen := aSymbol! Item was added: + ----- Method: PluggableButtonSpec>>style (in category 'accessing') ----- + style + "Treat aSymbol as a hint to modify the button appearance." + ^style + + ! Item was added: + ----- Method: PluggableButtonSpec>>style: (in category 'accessing') ----- + style: aSymbol + "Use aSymbol as a hint to modify the button appearance." + style := aSymbol + !

1 0

The Trunk: Tools-dtl.381.mcz
by commits＠source.squeak.org 29 Sep '11

29 Sep '11

David T. Lewis uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-dtl.381.mcz ==================== Summary ==================== Name: Tools-dtl.381 Author: dtl Time: 28 September 2011, 7:45:43.945 pm UUID: 77c96c37-0027-4bb6-929b-6d04917268b7 Ancestors: Tools-eem.380 Provide updating button for "what to show" button on CodeHolder, similar to Squeak 3.8 behavior. This button activates a menu, and displays the resulting menu selection. For the default look, normal buttons are rounded and the menu activation button is square (vice versa if the "Rounded Button Corners" preference is disabled). When menu selection is changed, the button label displays the selected mode ('source', 'decompile', 'bytecodes' etc). Changes are in four packages. ToolBuilder-Kernel: - Add PluggableButtonSpec>>style to provide style hint. Used to suggest that a button should be rendered differently, in this case rounded versus square corners. - Add changeLableWhen: to connect pluggable button with change notification, in this case to allow update: #contents to result in a label update in the dependent button. ToolBuilder-Morphic: - Add #whenChanged:update: as a mechanism for hooking change events to button updates, allowing an individual button to respond to e.g. self changed: #contents in the model. - Update MorphicToolBuilder>>buildPluggableButton to make use of style and changeLabelWhen in the widget spec. Tools: - Update CodeHolder>>buildCodeProvenanceButtonWith: to add style hint for round/ square corners and changeLableWhen: for change notification to the widget spec. Note: ToolBuilder has PluggableDropDownListSpec which is presumably intended to describe a drop-down list widget. This is currently unused in the image, but in future might provide a better approach than the current action button with menu approach. Morphic: - Let style hint control rounded versus square corners for a PluggableButtonMorph. May be used as a visual cue to distinguish simple action buttons from buttons that invoke a selection menu (e.g. "what to show" button for a CodeHolder). - Instance var #style was added to PluggableButtonMorph, so must also update #veryDeepInner: to match (problem detected by DeepCopier>>checkClass: called from ChangeSet>>fileOutClassDefinition:on:). =============== Diff against Tools-eem.380 =============== Item was changed: ----- Method: CodeHolder>>buildCodeProvenanceButtonWith: (in category 'toolbuilder') ----- buildCodeProvenanceButtonWith: builder | buttonSpec | buttonSpec := builder pluggableActionButtonSpec new. buttonSpec model: self. buttonSpec label: #codePaneProvenanceString. + buttonSpec changeLabelWhen: #contents. + buttonSpec style: #menuButton. buttonSpec action: #offerWhatToShowMenu. buttonSpec help: 'Governs what view is shown in the code pane. Click here to change the view'. ^buttonSpec! Item was changed: ----- Method: CodeHolder>>decompiledSourceIntoContentsWithTempNames: (in category 'message list') ----- decompiledSourceIntoContentsWithTempNames: showTempNames "Obtain a source string by decompiling the method's code, and place that source string into my contents. Also return the string. Get temps from source file if showTempNames is true." | tempNames class selector method | class := self selectedClassOrMetaClass. selector := self selectedMessageName. "Was method deleted while in another project?" method := class compiledMethodAt: selector ifAbsent: [^ '']. currentCompiledMethod := method. (showTempNames not + or: [method fileIndex > 0 + and: [(SourceFiles at: method fileIndex) isNil]]) + ifTrue: [ - or: [method fileIndex > 0 and: [(SourceFiles at: method fileIndex) isNil]]) - ifTrue: "Emergency or no source file -- decompile without temp names " + contents := (class decompilerClass new + decompile: selector + in: class + method: method) decompileString] + ifFalse: [tempNames := (class newCompiler - [contents := (class decompilerClass new - decompile: selector - in: class - method: method methodForDecompile) decompileString] - ifFalse: - [tempNames := (class newCompiler parse: method getSourceFromFile asString in: class notifying: nil) generate: CompiledMethodTrailer defaultMethodTrailer; schematicTempNamesString. contents := ((class decompilerClass new withTempNames: tempNames) + decompile: selector + in: class + method: method) decompileString]. - decompile: selector - in: class - method: method methodForDecompile) decompileString]. contents := contents asText makeSelectorBoldIn: class. ^ contents copy!

1 0

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

Jump to page: