Latest OB broken in PharoCore

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
3 messages Options
Reply | Threaded
Open this post in threaded view
|

Latest OB broken in PharoCore

hernanmd
Hi,
  I've installed OB with the following script (from
http://code.google.com/p/pharo/wiki/RewriteTools) in Pharo-Core:

Gofer new
        squeaksource: 'rb';
        addPackage: 'AST-Core';
        addPackage: 'Refactoring-Core';
        addPackage: 'Refactoring-Spelling';
        renggli: 'omnibrowser';
        addPackage: 'OmniBrowser';
        addPackage: 'OB-Standard';
        addPackage: 'OB-Morphic';
        addPackage: 'OB-Shout';
        addPackage: 'OB-Refactory';
        addPackage: 'OB-Regex';
        load.

but when opening an OB system browser there is a MNU related with
OBShoutPlatform:

17 December 2009 2:21:19 pm

VM: Win32 - IX86 - NT - Squeak3.10.2 of '5 June 2008' [latest update: #7179]
Image: PharoCore1.1ALPHA [Latest update: #11106]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true

OBShoutPlatform(Object)>>doesNotUnderstand: #build:
        Receiver: an OBShoutPlatform
        Arguments and temporary variables:
                aMessage: build: an OBSystemBrowser
                exception: MessageNotUnderstood: OBShoutPlatform>>build:
                resumeValue: nil
        Receiver's instance variables:
an OBShoutPlatform

OBShoutPlatform(OBMorphicPlatform)>>handleBrowseRequest:
        Receiver: an OBShoutPlatform
        Arguments and temporary variables:
                request: OBBrowseRequest
        Receiver's instance variables:
an OBShoutPlatform

OBBrowseRequest>>handleWith:
        Receiver: OBBrowseRequest
        Arguments and temporary variables:
                anObject: an OBShoutPlatform
        Receiver's instance variables:
                messageText: nil
                tag: nil
                signalContext: OBBrowseRequest(Exception)>>signal
                handlerContext: nil
                outerContext: nil
                browser: an OBSystemBrowser

OBBrowseRequest(OBInteractionRequest)>>defaultAction
        Receiver: OBBrowseRequest
        Arguments and temporary variables:

        Receiver's instance variables:
                messageText: nil
                tag: nil
                signalContext: OBBrowseRequest(Exception)>>signal
                handlerContext: nil
                outerContext: nil
                browser: an OBSystemBrowser

UndefinedObject>>handleSignal:
        Receiver: nil
        Arguments and temporary variables:
                exception: OBBrowseRequest
        Receiver's instance variables:
nil

MethodContext(ContextPart)>>handleSignal:
        Receiver: BlockClosure>>on:do:
        Arguments and temporary variables:
                exception: OBBrowseRequest
                val: nil
        Receiver's instance variables:
                sender: PasteUpMorph>>becomeActiveDuring:
                pc: 17
                stackp: 3
                method: (BlockClosure>>#on:do: "a CompiledMethod(3772)")
                closureOrNil: nil
                receiver: [closure] in PasteUpMorph>>becomeActiveDuring:

OBBrowseRequest(Exception)>>signal
        Receiver: OBBrowseRequest
        Arguments and temporary variables:

        Receiver's instance variables:
                messageText: nil
                tag: nil
                signalContext: OBBrowseRequest(Exception)>>signal
                handlerContext: nil
                outerContext: nil
                browser: an OBSystemBrowser

OBBrowseRequest class>>signal:
        Receiver: OBBrowseRequest
        Arguments and temporary variables:
                aBrowser: an OBSystemBrowser
        Receiver's instance variables:
                superclass: OBInteractionRequest
                methodDict: a MethodDictionary(#browser->(OBBrowseRequest>>#browser
"a Compiled...etc...
                format: 142
                instanceVariables: #('browser')
                organization: ('accessing' browser browser:)
('dispatching' handleWith:)
('test...etc...
                subclasses: nil
                name: #OBBrowseRequest
                classPool: nil
                sharedPools: nil
                environment: Smalltalk
                category: #'OmniBrowser-Notifications'
                traitComposition: {}
                localSelectors: nil

OBSystemBrowser(OBBrowser)>>open
        Receiver: an OBSystemBrowser
        Arguments and temporary variables:

        Receiver's instance variables:
                panels: an OrderedCollection(an OBColumnPanel an OBFixedButtonPanel
an OBDefini...etc...
                announcer: an OBAnnouncer
                cmdFactories: {OBCmdRemoveClass. ORCmdFormat. OBCmdRevertMethod.
OBCmdRenameCat...etc...
                hasChanges: nil

OBSystemBrowser class(OBBrowser class)>>open
        Receiver: OBSystemBrowser
        Arguments and temporary variables:

        Receiver's instance variables:
                superclass: OBCodeBrowser
                methodDict: a
MethodDictionary(#defaultBackgroundColor->(OBSystemBrowser>>#defa...etc...
                format: 138
                instanceVariables: nil
                organization: ('morphic' defaultBackgroundColor labelString)
('testing' isClass...etc...
                subclasses: nil
                name: #OBSystemBrowser
                classPool: nil
                sharedPools: nil
                environment: Smalltalk
                category: #'OB-Standard-Browsers'
                traitComposition: {}
                localSelectors: nil

OBSystemBrowserAdaptor class>>open
        Receiver: OBSystemBrowserAdaptor
        Arguments and temporary variables:

        Receiver's instance variables:
                superclass: Object
                methodDict: a
MethodDictionary(#labelString->(OBSystemBrowserAdaptor>>#labelStr...etc...
                format: 134
                instanceVariables: #('class' 'selector')
                organization: ('registry protocol' labelString openEditString:
setClass:selecto...etc...
                subclasses: nil
                name: #OBSystemBrowserAdaptor
                classPool: nil
                sharedPools: nil
                environment: Smalltalk
                category: #'OB-Standard-Utilities'
                traitComposition: {}
                localSelectors: nil

StandardToolSet class>>openClassBrowser
        Receiver: StandardToolSet
        Arguments and temporary variables:

        Receiver's instance variables:
                superclass: Object
                methodDict: a MethodDictionary()
                format: 2
                instanceVariables: nil
                organization: ('as yet unclassified')

                subclasses: nil
                name: #StandardToolSet
                classPool: nil
                sharedPools: nil
                environment: Smalltalk
                category: #'Tools-Base'
                traitComposition: nil
                localSelectors: nil

[] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
        Arguments and temporary variables:
                evt: [835@167 mouseUp 23822953 nil]
                selArgCount: #(0)
        Receiver's instance variables:
                bounds: 795@165 corner: 929@177
                owner: a MenuMorph(1298)
                submorphs: #()
                fullBounds: 795@165 corner: 929@177
                color: Color black
                extension: a MorphExtension (2377)
                font: a StrikeFontSet(Accuny12 12)
                emphasis: 0
                contents: 'Class Browser'
                hasFocus: false
                isEnabled: true
                subMenu: nil
                isSelected: false
                target: StandardToolSet
                selector: #openClassBrowser
                arguments: #()
                icon: nil
                getStateSelector: nil
                enablementSelector: nil
                keyText: nil

BlockClosure>>ensure:
        Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
        Arguments and temporary variables:
                aBlock: [closure] in CursorWithMask(Cursor)>>showWhile:
                returnValue: nil
                b: nil
        Receiver's instance variables:
                outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
                startpc: 136
                numArgs: 0

CursorWithMask(Cursor)>>showWhile:
        Receiver: ((CursorWithMask
        extent: 16@16
        depth: 1
        fromArray: #(
                2r0
                2r10000000000000000000000...etc...
        Arguments and temporary variables:
                aBlock: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
                oldcursor: ((CursorWithMask
        extent: 16@16
        depth: 1
        fromArray: #(
                2r0
                2r1...etc...
        Receiver's instance variables:
                bits: a Bitmap of length 16
                width: 16
                height: 16
                depth: 1
                offset: -1@-1
                maskForm: Form(16x16x1)

ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
        Arguments and temporary variables:
                evt: [835@167 mouseUp 23822953 nil]
                w: a PasteUpMorph(1622) [world]
                selArgCount: #(0)
        Receiver's instance variables:
                bounds: 795@165 corner: 929@177
                owner: a MenuMorph(1298)
                submorphs: #()
                fullBounds: 795@165 corner: 929@177
                color: Color black
                extension: a MorphExtension (2377)
                font: a StrikeFontSet(Accuny12 12)
                emphasis: 0
                contents: 'Class Browser'
                hasFocus: false
                isEnabled: true
                subMenu: nil
                isSelected: false
                target: StandardToolSet
                selector: #openClassBrowser
                arguments: #()
                icon: nil
                getStateSelector: nil
                enablementSelector: nil
                keyText: nil

ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
        Arguments and temporary variables:
                evt: [835@167 mouseUp 23822953 nil]
        Receiver's instance variables:
                bounds: 795@165 corner: 929@177
                owner: a MenuMorph(1298)
                submorphs: #()
                fullBounds: 795@165 corner: 929@177
                color: Color black
                extension: a MorphExtension (2377)
                font: a StrikeFontSet(Accuny12 12)
                emphasis: 0
                contents: 'Class Browser'
                hasFocus: false
                isEnabled: true
                subMenu: nil
                isSelected: false
                target: StandardToolSet
                selector: #openClassBrowser
                arguments: #()
                icon: nil
                getStateSelector: nil
                enablementSelector: nil
                keyText: nil

ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
        Receiver's instance variables:
                bounds: 795@165 corner: 929@177
                owner: a MenuMorph(1298)
                submorphs: #()
                fullBounds: 795@165 corner: 929@177
                color: Color black
                extension: a MorphExtension (2377)
                font: a StrikeFontSet(Accuny12 12)
                emphasis: 0
                contents: 'Class Browser'
                hasFocus: false
                isEnabled: true
                subMenu: nil
                isSelected: false
                target: StandardToolSet
                selector: #openClassBrowser
                arguments: #()
                icon: nil
                getStateSelector: nil
                enablementSelector: nil
                keyText: nil

MouseButtonEvent>>sentTo:
        Receiver: [835@167 mouseUp 23822953 nil]
        Arguments and temporary variables:
                anObject: a ToggleMenuItemMorph(1516)'Class Browser'
        Receiver's instance variables:
                timeStamp: 23822953
                source: a HandMorph(3216)
                windowIndex: nil
                type: #mouseUp
                buttons: 0
                position: 835@167
                handler: nil
                wasHandled: true
                whichButton: 4

ToggleMenuItemMorph(Morph)>>handleEvent:
        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
        Receiver's instance variables:
                bounds: 795@165 corner: 929@177
                owner: a MenuMorph(1298)
                submorphs: #()
                fullBounds: 795@165 corner: 929@177
                color: Color black
                extension: a MorphExtension (2377)
                font: a StrikeFontSet(Accuny12 12)
                emphasis: 0
                contents: 'Class Browser'
                hasFocus: false
                isEnabled: true
                subMenu: nil
                isSelected: false
                target: StandardToolSet
                selector: #openClassBrowser
                arguments: #()
                icon: nil
                getStateSelector: nil
                enablementSelector: nil
                keyText: nil

MorphicEventDispatcher>>dispatchDefault:with:
        Receiver: a MorphicEventDispatcher
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                aMorph: a ToggleMenuItemMorph(1516)'Class Browser'
                localEvt: nil
                index: 1
                child: nil
                morphs: #()
                inside: true
        Receiver's instance variables:
                lastType: #mouseUp
                lastDispatch: #dispatchDefault:with:

MorphicEventDispatcher>>dispatchEvent:with:
        Receiver: a MorphicEventDispatcher
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                aMorph: a ToggleMenuItemMorph(1516)'Class Browser'
        Receiver's instance variables:
                lastType: #mouseUp
                lastDispatch: #dispatchDefault:with:

ToggleMenuItemMorph(Morph)>>processEvent:using:
        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                defaultDispatcher: a MorphicEventDispatcher
        Receiver's instance variables:
                bounds: 795@165 corner: 929@177
                owner: a MenuMorph(1298)
                submorphs: #()
                fullBounds: 795@165 corner: 929@177
                color: Color black
                extension: a MorphExtension (2377)
                font: a StrikeFontSet(Accuny12 12)
                emphasis: 0
                contents: 'Class Browser'
                hasFocus: false
                isEnabled: true
                subMenu: nil
                isSelected: false
                target: StandardToolSet
                selector: #openClassBrowser
                arguments: #()
                icon: nil
                getStateSelector: nil
                enablementSelector: nil
                keyText: nil

MorphicEventDispatcher>>dispatchDefault:with:
        Receiver: a MorphicEventDispatcher
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                aMorph: a MenuMorph(1298)
                localEvt: [835@167 mouseUp 23822953 nil]
                index: 1
                child: a ToggleMenuItemMorph(1516)'Class Browser'
                morphs: an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
ToggleMenuItemMor...etc...
                inside: false
        Receiver's instance variables:
                lastType: #mouseUp
                lastDispatch: #dispatchDefault:with:

MorphicEventDispatcher>>dispatchEvent:with:
        Receiver: a MorphicEventDispatcher
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                aMorph: a MenuMorph(1298)
        Receiver's instance variables:
                lastType: #mouseUp
                lastDispatch: #dispatchDefault:with:

MenuMorph(Morph)>>processEvent:using:
        Receiver: a MenuMorph(1298)
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                defaultDispatcher: a MorphicEventDispatcher
        Receiver's instance variables:
                bounds: 791@161 corner: 933@336
                owner: nil
                submorphs: an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
ToggleMenuItem...etc...
                fullBounds: 791@161 corner: 934@337
                color: (Color r: 0.871 g: 0.871 b: 0.871)
                extension: a MorphExtension (4004) [other:  (basicColor -> (Color
r: 0.784 g: 0...etc...
                borderWidth: 1
                borderColor: Color gray
                defaultTarget: a TheWorldMenu
                selectedItem: a ToggleMenuItemMorph(1516)'Class Browser'
                stayUp: false
                popUpOwner: a ToggleMenuItemMorph(2693)'Tools'
                activeSubMenu: nil
                activatorDockingBar: nil
                embeddable: nil

MenuMorph(Morph)>>processEvent:
        Receiver: a MenuMorph(1298)
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
        Receiver's instance variables:
                bounds: 791@161 corner: 933@336
                owner: nil
                submorphs: an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
ToggleMenuItem...etc...
                fullBounds: 791@161 corner: 934@337
                color: (Color r: 0.871 g: 0.871 b: 0.871)
                extension: a MorphExtension (4004) [other:  (basicColor -> (Color
r: 0.784 g: 0...etc...
                borderWidth: 1
                borderColor: Color gray
                defaultTarget: a TheWorldMenu
                selectedItem: a ToggleMenuItemMorph(1516)'Class Browser'
                stayUp: false
                popUpOwner: a ToggleMenuItemMorph(2693)'Tools'
                activeSubMenu: nil
                activatorDockingBar: nil
                embeddable: nil

MenuMorph>>handleFocusEvent:
        Receiver: a MenuMorph(1298)
        Arguments and temporary variables:
                evt: [835@167 mouseUp 23822953 nil]
        Receiver's instance variables:
                bounds: 791@161 corner: 933@336
                owner: nil
                submorphs: an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
ToggleMenuItem...etc...
                fullBounds: 791@161 corner: 934@337
                color: (Color r: 0.871 g: 0.871 b: 0.871)
                extension: a MorphExtension (4004) [other:  (basicColor -> (Color
r: 0.784 g: 0...etc...
                borderWidth: 1
                borderColor: Color gray
                defaultTarget: a TheWorldMenu
                selectedItem: a ToggleMenuItemMorph(1516)'Class Browser'
                stayUp: false
                popUpOwner: a ToggleMenuItemMorph(2693)'Tools'
                activeSubMenu: nil
                activatorDockingBar: nil
                embeddable: nil

[] in HandMorph>>sendFocusEvent:to:clear:
        Receiver: a HandMorph(3216)
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                focusHolder: a MenuMorph(1298)
                result: #(nil)
        Receiver's instance variables:
                bounds: 709@476 corner: 725@492
                owner: a PasteUpMorph(1622) [world]
                submorphs: #()
                fullBounds: 709@476 corner: 725@492
                color: Color blue
                extension: a MorphExtension (539) [eventHandler = an EventHandler]
                mouseFocus: nil
                keyboardFocus: nil
                eventListeners: nil
                mouseListeners: nil
                keyboardListeners: nil
                mouseClickState: nil
                mouseOverHandler: a MouseOverHandler
                lastMouseEvent: [709@476 mouseUp 23973171 nil]
                targetOffset: 17@12
                damageRecorder: a DamageRecorder
                cacheCanvas: nil
                cachedCanvasHasHoles: true
                temporaryCursor: nil
                temporaryCursorOffset: nil
                hardwareCursor: nil
                hasChanged: true
                savedPatch: nil
                userInitials: ''
                lastEventBuffer: #(1 23973171 709 476 0 0 0 1)
                lastKeyScanCode: 77
                combinedChar: nil

[] in PasteUpMorph>>becomeActiveDuring:
        Receiver: a PasteUpMorph(1622) [world]
        Arguments and temporary variables:
                aBlock: [closure] in HandMorph>>sendFocusEvent:to:clear:
        Receiver's instance variables:
                bounds: 0@0 corner: 1280@751
                owner: nil
                submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(770) a
SystemWindow(359...etc...
                fullBounds: 0@0 corner: 1280@751
                color: (Color r: 0.97 g: 0.98 b: 1.0)
                extension: a MorphExtension (2543) [eventHandler = an EventHandler]
 [other:  (...etc...
                borderWidth: 0
                borderColor: (Color r: 0.03 g: 0.02 b: 0.0)
                model: a MorphicModel(1926)
                cursor: 1
                padding: 3
                backgroundMorph: nil
                isPartsBin: nil
                autoLineLayout: false
                indicateCursor: nil
                resizeToFit: nil
                worldState: a WorldState
                griddingOn: nil

BlockClosure>>on:do:
        Receiver: [closure] in PasteUpMorph>>becomeActiveDuring:
        Arguments and temporary variables:
                exception: Error
                handlerAction: [closure] in PasteUpMorph>>becomeActiveDuring:
                handlerActive: false
        Receiver's instance variables:
                outerContext: PasteUpMorph>>becomeActiveDuring:
                startpc: 67
                numArgs: 0

PasteUpMorph>>becomeActiveDuring:
        Receiver: a PasteUpMorph(1622) [world]
        Arguments and temporary variables:
                aBlock: [closure] in HandMorph>>sendFocusEvent:to:clear:
                priorWorld: a PasteUpMorph(1622) [world]
                priorHand: a HandMorph(3216)
                priorEvent: [835@167 mouseOver red nil nil]
        Receiver's instance variables:
                bounds: 0@0 corner: 1280@751
                owner: nil
                submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(770) a
SystemWindow(359...etc...
                fullBounds: 0@0 corner: 1280@751
                color: (Color r: 0.97 g: 0.98 b: 1.0)
                extension: a MorphExtension (2543) [eventHandler = an EventHandler]
 [other:  (...etc...
                borderWidth: 0
                borderColor: (Color r: 0.03 g: 0.02 b: 0.0)
                model: a MorphicModel(1926)
                cursor: 1
                padding: 3
                backgroundMorph: nil
                isPartsBin: nil
                autoLineLayout: false
                indicateCursor: nil
                resizeToFit: nil
                worldState: a WorldState
                griddingOn: nil

HandMorph>>sendFocusEvent:to:clear:
        Receiver: a HandMorph(3216)
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                focusHolder: a MenuMorph(1298)
                aBlock: [closure] in HandMorph>>sendMouseEvent:
                w: a PasteUpMorph(1622) [world]
                result: #(nil)
        Receiver's instance variables:
                bounds: 709@476 corner: 725@492
                owner: a PasteUpMorph(1622) [world]
                submorphs: #()
                fullBounds: 709@476 corner: 725@492
                color: Color blue
                extension: a MorphExtension (539) [eventHandler = an EventHandler]
                mouseFocus: nil
                keyboardFocus: nil
                eventListeners: nil
                mouseListeners: nil
                keyboardListeners: nil
                mouseClickState: nil
                mouseOverHandler: a MouseOverHandler
                lastMouseEvent: [709@476 mouseUp 23973171 nil]
                targetOffset: 17@12
                damageRecorder: a DamageRecorder
                cacheCanvas: nil
                cachedCanvasHasHoles: true
                temporaryCursor: nil
                temporaryCursorOffset: nil
                hardwareCursor: nil
                hasChanged: true
                savedPatch: nil
                userInitials: ''
                lastEventBuffer: #(1 23973171 709 476 0 0 0 1)
                lastKeyScanCode: 77
                combinedChar: nil

HandMorph>>sendEvent:focus:clear:
        Receiver: a HandMorph(3216)
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                focusHolder: a MenuMorph(1298)
                aBlock: [closure] in HandMorph>>sendMouseEvent:
                result: nil
        Receiver's instance variables:
                bounds: 709@476 corner: 725@492
                owner: a PasteUpMorph(1622) [world]
                submorphs: #()
                fullBounds: 709@476 corner: 725@492
                color: Color blue
                extension: a MorphExtension (539) [eventHandler = an EventHandler]
                mouseFocus: nil
                keyboardFocus: nil
                eventListeners: nil
                mouseListeners: nil
                keyboardListeners: nil
                mouseClickState: nil
                mouseOverHandler: a MouseOverHandler
                lastMouseEvent: [709@476 mouseUp 23973171 nil]
                targetOffset: 17@12
                damageRecorder: a DamageRecorder
                cacheCanvas: nil
                cachedCanvasHasHoles: true
                temporaryCursor: nil
                temporaryCursorOffset: nil
                hardwareCursor: nil
                hasChanged: true
                savedPatch: nil
                userInitials: ''
                lastEventBuffer: #(1 23973171 709 476 0 0 0 1)
                lastKeyScanCode: 77
                combinedChar: nil

HandMorph>>sendMouseEvent:
        Receiver: a HandMorph(3216)
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
        Receiver's instance variables:
                bounds: 709@476 corner: 725@492
                owner: a PasteUpMorph(1622) [world]
                submorphs: #()
                fullBounds: 709@476 corner: 725@492
                color: Color blue
                extension: a MorphExtension (539) [eventHandler = an EventHandler]
                mouseFocus: nil
                keyboardFocus: nil
                eventListeners: nil
                mouseListeners: nil
                keyboardListeners: nil
                mouseClickState: nil
                mouseOverHandler: a MouseOverHandler
                lastMouseEvent: [709@476 mouseUp 23973171 nil]
                targetOffset: 17@12
                damageRecorder: a DamageRecorder
                cacheCanvas: nil
                cachedCanvasHasHoles: true
                temporaryCursor: nil
                temporaryCursorOffset: nil
                hardwareCursor: nil
                hasChanged: true
                savedPatch: nil
                userInitials: ''
                lastEventBuffer: #(1 23973171 709 476 0 0 0 1)
                lastKeyScanCode: 77
                combinedChar: nil

HandMorph>>handleEvent:
        Receiver: a HandMorph(3216)
        Arguments and temporary variables:
                anEvent: [835@167 mouseUp 23822953 nil]
                evt: [835@167 mouseUp 23822953 nil]
                ofs: nil
        Receiver's instance variables:
                bounds: 709@476 corner: 725@492
                owner: a PasteUpMorph(1622) [world]
                submorphs: #()
                fullBounds: 709@476 corner: 725@492
                color: Color blue
                extension: a MorphExtension (539) [eventHandler = an EventHandler]
                mouseFocus: nil
                keyboardFocus: nil
                eventListeners: nil
                mouseListeners: nil
                keyboardListeners: nil
                mouseClickState: nil
                mouseOverHandler: a MouseOverHandler
                lastMouseEvent: [709@476 mouseUp 23973171 nil]
                targetOffset: 17@12
                damageRecorder: a DamageRecorder
                cacheCanvas: nil
                cachedCanvasHasHoles: true
                temporaryCursor: nil
                temporaryCursorOffset: nil
                hardwareCursor: nil
                hasChanged: true
                savedPatch: nil
                userInitials: ''
                lastEventBuffer: #(1 23973171 709 476 0 0 0 1)
                lastKeyScanCode: 77
                combinedChar: nil

HandMorph>>processEvents
        Receiver: a HandMorph(3216)
        Arguments and temporary variables:
                evt: [835@167 mouseUp 23822953 nil]
                evtBuf: #(1 23822953 835 167 0 0 0 1)
                type: 1
                hadAny: false
        Receiver's instance variables:
                bounds: 709@476 corner: 725@492
                owner: a PasteUpMorph(1622) [world]
                submorphs: #()
                fullBounds: 709@476 corner: 725@492
                color: Color blue
                extension: a MorphExtension (539) [eventHandler = an EventHandler]
                mouseFocus: nil
                keyboardFocus: nil
                eventListeners: nil
                mouseListeners: nil
                keyboardListeners: nil
                mouseClickState: nil
                mouseOverHandler: a MouseOverHandler
                lastMouseEvent: [709@476 mouseUp 23973171 nil]
                targetOffset: 17@12
                damageRecorder: a DamageRecorder
                cacheCanvas: nil
                cachedCanvasHasHoles: true
                temporaryCursor: nil
                temporaryCursorOffset: nil
                hardwareCursor: nil
                hasChanged: true
                savedPatch: nil
                userInitials: ''
                lastEventBuffer: #(1 23973171 709 476 0 0 0 1)
                lastKeyScanCode: 77
                combinedChar: nil

[] in WorldState>>doOneCycleNowFor:
        Receiver: a WorldState
        Arguments and temporary variables:
                h: a HandMorph(3216)
        Receiver's instance variables:
                hands: an Array(a HandMorph(3216))
                viewBox: 0@0 corner: 1280@751
                canvas: a FormCanvas on: DisplayScreen(1280x751x32)
                damageRecorder: a DamageRecorder
                stepList: a Heap(StepMessage(#stepAt: -> a SystemWindow(770))(a
SystemWindow(77...etc...
                lastStepTime: 23973261
                lastStepMessage: nil
                lastCycleTime: 23973183
                commandHistory: a CommandHistory
                alarms: a Heap()
                lastAlarmTime: 23973261

Array(SequenceableCollection)>>do:
        Receiver: an Array(a HandMorph(3216))
        Arguments and temporary variables:
                aBlock: [closure] in WorldState>>doOneCycleNowFor:
                index: 1
                indexLimiT: 1
        Receiver's instance variables:
an Array(a HandMorph(3216))


--- The full stack ---
OBShoutPlatform(Object)>>doesNotUnderstand: #build:
OBShoutPlatform(OBMorphicPlatform)>>handleBrowseRequest:
OBBrowseRequest>>handleWith:
OBBrowseRequest(OBInteractionRequest)>>defaultAction
UndefinedObject>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
OBBrowseRequest(Exception)>>signal
OBBrowseRequest class>>signal:
OBSystemBrowser(OBBrowser)>>open
OBSystemBrowser class(OBBrowser class)>>open
OBSystemBrowserAdaptor class>>open
StandardToolSet class>>openClassBrowser
[] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
BlockClosure>>ensure:
CursorWithMask(Cursor)>>showWhile:
ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
ToggleMenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
ToggleMenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear:
[] in PasteUpMorph>>becomeActiveDuring:
BlockClosure>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
 - - - - - - - - - - - - - - -
                        - - - - - - - - - - - - - - - - - -
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess
[] in BlockClosure>>newProcess

Hernán

_______________________________________________
Pharo-project mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
Reply | Threaded
Open this post in threaded view
|

Re: Latest OB broken in PharoCore

Lukas Renggli
If you load OB-Shout you also need to load the underlying support for Shout.

Gofer new
        renggli: 'unsorted';
        package: 'Shout';
        package: 'RoelTyper';
        package: 'ECompletion';
        package: 'ECompletionOmniBrowser';
        load.

Generally RB and OB doesn't work on 1.1 yet, so you are on shaky grounds.

Lukas

2009/12/17 Hernán Morales Durand <[hidden email]>:

> Hi,
>  I've installed OB with the following script (from
> http://code.google.com/p/pharo/wiki/RewriteTools) in Pharo-Core:
>
> Gofer new
>        squeaksource: 'rb';
>        addPackage: 'AST-Core';
>        addPackage: 'Refactoring-Core';
>        addPackage: 'Refactoring-Spelling';
>        renggli: 'omnibrowser';
>        addPackage: 'OmniBrowser';
>        addPackage: 'OB-Standard';
>        addPackage: 'OB-Morphic';
>        addPackage: 'OB-Shout';
>        addPackage: 'OB-Refactory';
>        addPackage: 'OB-Regex';
>        load.
>
> but when opening an OB system browser there is a MNU related with
> OBShoutPlatform:
>
> 17 December 2009 2:21:19 pm
>
> VM: Win32 - IX86 - NT - Squeak3.10.2 of '5 June 2008' [latest update: #7179]
> Image: PharoCore1.1ALPHA [Latest update: #11106]
>
> SecurityManager state:
> Restricted: false
> FileAccess: true
> SocketAccess: true
>
> OBShoutPlatform(Object)>>doesNotUnderstand: #build:
>        Receiver: an OBShoutPlatform
>        Arguments and temporary variables:
>                aMessage:       build: an OBSystemBrowser
>                exception:      MessageNotUnderstood: OBShoutPlatform>>build:
>                resumeValue:    nil
>        Receiver's instance variables:
> an OBShoutPlatform
>
> OBShoutPlatform(OBMorphicPlatform)>>handleBrowseRequest:
>        Receiver: an OBShoutPlatform
>        Arguments and temporary variables:
>                request:        OBBrowseRequest
>        Receiver's instance variables:
> an OBShoutPlatform
>
> OBBrowseRequest>>handleWith:
>        Receiver: OBBrowseRequest
>        Arguments and temporary variables:
>                anObject:       an OBShoutPlatform
>        Receiver's instance variables:
>                messageText:    nil
>                tag:    nil
>                signalContext:  OBBrowseRequest(Exception)>>signal
>                handlerContext:         nil
>                outerContext:   nil
>                browser:        an OBSystemBrowser
>
> OBBrowseRequest(OBInteractionRequest)>>defaultAction
>        Receiver: OBBrowseRequest
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                messageText:    nil
>                tag:    nil
>                signalContext:  OBBrowseRequest(Exception)>>signal
>                handlerContext:         nil
>                outerContext:   nil
>                browser:        an OBSystemBrowser
>
> UndefinedObject>>handleSignal:
>        Receiver: nil
>        Arguments and temporary variables:
>                exception:      OBBrowseRequest
>        Receiver's instance variables:
> nil
>
> MethodContext(ContextPart)>>handleSignal:
>        Receiver: BlockClosure>>on:do:
>        Arguments and temporary variables:
>                exception:      OBBrowseRequest
>                val:    nil
>        Receiver's instance variables:
>                sender:         PasteUpMorph>>becomeActiveDuring:
>                pc:     17
>                stackp:         3
>                method:         (BlockClosure>>#on:do: "a CompiledMethod(3772)")
>                closureOrNil:   nil
>                receiver:       [closure] in PasteUpMorph>>becomeActiveDuring:
>
> OBBrowseRequest(Exception)>>signal
>        Receiver: OBBrowseRequest
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                messageText:    nil
>                tag:    nil
>                signalContext:  OBBrowseRequest(Exception)>>signal
>                handlerContext:         nil
>                outerContext:   nil
>                browser:        an OBSystemBrowser
>
> OBBrowseRequest class>>signal:
>        Receiver: OBBrowseRequest
>        Arguments and temporary variables:
>                aBrowser:       an OBSystemBrowser
>        Receiver's instance variables:
>                superclass:     OBInteractionRequest
>                methodDict:     a MethodDictionary(#browser->(OBBrowseRequest>>#browser
> "a Compiled...etc...
>                format:         142
>                instanceVariables:      #('browser')
>                organization:   ('accessing' browser browser:)
> ('dispatching' handleWith:)
> ('test...etc...
>                subclasses:     nil
>                name:   #OBBrowseRequest
>                classPool:      nil
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #'OmniBrowser-Notifications'
>                traitComposition:       {}
>                localSelectors:         nil
>
> OBSystemBrowser(OBBrowser)>>open
>        Receiver: an OBSystemBrowser
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                panels:         an OrderedCollection(an OBColumnPanel an OBFixedButtonPanel
> an OBDefini...etc...
>                announcer:      an OBAnnouncer
>                cmdFactories:   {OBCmdRemoveClass. ORCmdFormat. OBCmdRevertMethod.
> OBCmdRenameCat...etc...
>                hasChanges:     nil
>
> OBSystemBrowser class(OBBrowser class)>>open
>        Receiver: OBSystemBrowser
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                superclass:     OBCodeBrowser
>                methodDict:     a
> MethodDictionary(#defaultBackgroundColor->(OBSystemBrowser>>#defa...etc...
>                format:         138
>                instanceVariables:      nil
>                organization:   ('morphic' defaultBackgroundColor labelString)
> ('testing' isClass...etc...
>                subclasses:     nil
>                name:   #OBSystemBrowser
>                classPool:      nil
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #'OB-Standard-Browsers'
>                traitComposition:       {}
>                localSelectors:         nil
>
> OBSystemBrowserAdaptor class>>open
>        Receiver: OBSystemBrowserAdaptor
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                superclass:     Object
>                methodDict:     a
> MethodDictionary(#labelString->(OBSystemBrowserAdaptor>>#labelStr...etc...
>                format:         134
>                instanceVariables:      #('class' 'selector')
>                organization:   ('registry protocol' labelString openEditString:
> setClass:selecto...etc...
>                subclasses:     nil
>                name:   #OBSystemBrowserAdaptor
>                classPool:      nil
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #'OB-Standard-Utilities'
>                traitComposition:       {}
>                localSelectors:         nil
>
> StandardToolSet class>>openClassBrowser
>        Receiver: StandardToolSet
>        Arguments and temporary variables:
>
>        Receiver's instance variables:
>                superclass:     Object
>                methodDict:     a MethodDictionary()
>                format:         2
>                instanceVariables:      nil
>                organization:   ('as yet unclassified')
>
>                subclasses:     nil
>                name:   #StandardToolSet
>                classPool:      nil
>                sharedPools:    nil
>                environment:    Smalltalk
>                category:       #'Tools-Base'
>                traitComposition:       nil
>                localSelectors:         nil
>
> [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>        Arguments and temporary variables:
>                evt:    [835@167 mouseUp 23822953 nil]
>                selArgCount:    #(0)
>        Receiver's instance variables:
>                bounds:         795@165 corner: 929@177
>                owner:  a MenuMorph(1298)
>                submorphs:      #()
>                fullBounds:     795@165 corner: 929@177
>                color:  Color black
>                extension:      a MorphExtension (2377)
>                font:   a StrikeFontSet(Accuny12 12)
>                emphasis:       0
>                contents:       'Class Browser'
>                hasFocus:       false
>                isEnabled:      true
>                subMenu:        nil
>                isSelected:     false
>                target:         StandardToolSet
>                selector:       #openClassBrowser
>                arguments:      #()
>                icon:   nil
>                getStateSelector:       nil
>                enablementSelector:     nil
>                keyText:        nil
>
> BlockClosure>>ensure:
>        Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>        Arguments and temporary variables:
>                aBlock:         [closure] in CursorWithMask(Cursor)>>showWhile:
>                returnValue:    nil
>                b:      nil
>        Receiver's instance variables:
>                outerContext:   ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>                startpc:        136
>                numArgs:        0
>
> CursorWithMask(Cursor)>>showWhile:
>        Receiver: ((CursorWithMask
>        extent: 16@16
>        depth: 1
>        fromArray: #(
>                2r0
>                2r10000000000000000000000...etc...
>        Arguments and temporary variables:
>                aBlock:         [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>                oldcursor:      ((CursorWithMask
>        extent: 16@16
>        depth: 1
>        fromArray: #(
>                2r0
>                2r1...etc...
>        Receiver's instance variables:
>                bits:   a Bitmap of length 16
>                width:  16
>                height:         16
>                depth:  1
>                offset:         -1@-1
>                maskForm:       Form(16x16x1)
>
> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>        Arguments and temporary variables:
>                evt:    [835@167 mouseUp 23822953 nil]
>                w:      a PasteUpMorph(1622) [world]
>                selArgCount:    #(0)
>        Receiver's instance variables:
>                bounds:         795@165 corner: 929@177
>                owner:  a MenuMorph(1298)
>                submorphs:      #()
>                fullBounds:     795@165 corner: 929@177
>                color:  Color black
>                extension:      a MorphExtension (2377)
>                font:   a StrikeFontSet(Accuny12 12)
>                emphasis:       0
>                contents:       'Class Browser'
>                hasFocus:       false
>                isEnabled:      true
>                subMenu:        nil
>                isSelected:     false
>                target:         StandardToolSet
>                selector:       #openClassBrowser
>                arguments:      #()
>                icon:   nil
>                getStateSelector:       nil
>                enablementSelector:     nil
>                keyText:        nil
>
> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>        Arguments and temporary variables:
>                evt:    [835@167 mouseUp 23822953 nil]
>        Receiver's instance variables:
>                bounds:         795@165 corner: 929@177
>                owner:  a MenuMorph(1298)
>                submorphs:      #()
>                fullBounds:     795@165 corner: 929@177
>                color:  Color black
>                extension:      a MorphExtension (2377)
>                font:   a StrikeFontSet(Accuny12 12)
>                emphasis:       0
>                contents:       'Class Browser'
>                hasFocus:       false
>                isEnabled:      true
>                subMenu:        nil
>                isSelected:     false
>                target:         StandardToolSet
>                selector:       #openClassBrowser
>                arguments:      #()
>                icon:   nil
>                getStateSelector:       nil
>                enablementSelector:     nil
>                keyText:        nil
>
> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>        Receiver's instance variables:
>                bounds:         795@165 corner: 929@177
>                owner:  a MenuMorph(1298)
>                submorphs:      #()
>                fullBounds:     795@165 corner: 929@177
>                color:  Color black
>                extension:      a MorphExtension (2377)
>                font:   a StrikeFontSet(Accuny12 12)
>                emphasis:       0
>                contents:       'Class Browser'
>                hasFocus:       false
>                isEnabled:      true
>                subMenu:        nil
>                isSelected:     false
>                target:         StandardToolSet
>                selector:       #openClassBrowser
>                arguments:      #()
>                icon:   nil
>                getStateSelector:       nil
>                enablementSelector:     nil
>                keyText:        nil
>
> MouseButtonEvent>>sentTo:
>        Receiver: [835@167 mouseUp 23822953 nil]
>        Arguments and temporary variables:
>                anObject:       a ToggleMenuItemMorph(1516)'Class Browser'
>        Receiver's instance variables:
>                timeStamp:      23822953
>                source:         a HandMorph(3216)
>                windowIndex:    nil
>                type:   #mouseUp
>                buttons:        0
>                position:       835@167
>                handler:        nil
>                wasHandled:     true
>                whichButton:    4
>
> ToggleMenuItemMorph(Morph)>>handleEvent:
>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>        Receiver's instance variables:
>                bounds:         795@165 corner: 929@177
>                owner:  a MenuMorph(1298)
>                submorphs:      #()
>                fullBounds:     795@165 corner: 929@177
>                color:  Color black
>                extension:      a MorphExtension (2377)
>                font:   a StrikeFontSet(Accuny12 12)
>                emphasis:       0
>                contents:       'Class Browser'
>                hasFocus:       false
>                isEnabled:      true
>                subMenu:        nil
>                isSelected:     false
>                target:         StandardToolSet
>                selector:       #openClassBrowser
>                arguments:      #()
>                icon:   nil
>                getStateSelector:       nil
>                enablementSelector:     nil
>                keyText:        nil
>
> MorphicEventDispatcher>>dispatchDefault:with:
>        Receiver: a MorphicEventDispatcher
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                aMorph:         a ToggleMenuItemMorph(1516)'Class Browser'
>                localEvt:       nil
>                index:  1
>                child:  nil
>                morphs:         #()
>                inside:         true
>        Receiver's instance variables:
>                lastType:       #mouseUp
>                lastDispatch:   #dispatchDefault:with:
>
> MorphicEventDispatcher>>dispatchEvent:with:
>        Receiver: a MorphicEventDispatcher
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                aMorph:         a ToggleMenuItemMorph(1516)'Class Browser'
>        Receiver's instance variables:
>                lastType:       #mouseUp
>                lastDispatch:   #dispatchDefault:with:
>
> ToggleMenuItemMorph(Morph)>>processEvent:using:
>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                defaultDispatcher:      a MorphicEventDispatcher
>        Receiver's instance variables:
>                bounds:         795@165 corner: 929@177
>                owner:  a MenuMorph(1298)
>                submorphs:      #()
>                fullBounds:     795@165 corner: 929@177
>                color:  Color black
>                extension:      a MorphExtension (2377)
>                font:   a StrikeFontSet(Accuny12 12)
>                emphasis:       0
>                contents:       'Class Browser'
>                hasFocus:       false
>                isEnabled:      true
>                subMenu:        nil
>                isSelected:     false
>                target:         StandardToolSet
>                selector:       #openClassBrowser
>                arguments:      #()
>                icon:   nil
>                getStateSelector:       nil
>                enablementSelector:     nil
>                keyText:        nil
>
> MorphicEventDispatcher>>dispatchDefault:with:
>        Receiver: a MorphicEventDispatcher
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                aMorph:         a MenuMorph(1298)
>                localEvt:       [835@167 mouseUp 23822953 nil]
>                index:  1
>                child:  a ToggleMenuItemMorph(1516)'Class Browser'
>                morphs:         an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
> ToggleMenuItemMor...etc...
>                inside:         false
>        Receiver's instance variables:
>                lastType:       #mouseUp
>                lastDispatch:   #dispatchDefault:with:
>
> MorphicEventDispatcher>>dispatchEvent:with:
>        Receiver: a MorphicEventDispatcher
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                aMorph:         a MenuMorph(1298)
>        Receiver's instance variables:
>                lastType:       #mouseUp
>                lastDispatch:   #dispatchDefault:with:
>
> MenuMorph(Morph)>>processEvent:using:
>        Receiver: a MenuMorph(1298)
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                defaultDispatcher:      a MorphicEventDispatcher
>        Receiver's instance variables:
>                bounds:         791@161 corner: 933@336
>                owner:  nil
>                submorphs:      an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
> ToggleMenuItem...etc...
>                fullBounds:     791@161 corner: 934@337
>                color:  (Color r: 0.871 g: 0.871 b: 0.871)
>                extension:      a MorphExtension (4004) [other:  (basicColor -> (Color
> r: 0.784 g: 0...etc...
>                borderWidth:    1
>                borderColor:    Color gray
>                defaultTarget:  a TheWorldMenu
>                selectedItem:   a ToggleMenuItemMorph(1516)'Class Browser'
>                stayUp:         false
>                popUpOwner:     a ToggleMenuItemMorph(2693)'Tools'
>                activeSubMenu:  nil
>                activatorDockingBar:    nil
>                embeddable:     nil
>
> MenuMorph(Morph)>>processEvent:
>        Receiver: a MenuMorph(1298)
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>        Receiver's instance variables:
>                bounds:         791@161 corner: 933@336
>                owner:  nil
>                submorphs:      an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
> ToggleMenuItem...etc...
>                fullBounds:     791@161 corner: 934@337
>                color:  (Color r: 0.871 g: 0.871 b: 0.871)
>                extension:      a MorphExtension (4004) [other:  (basicColor -> (Color
> r: 0.784 g: 0...etc...
>                borderWidth:    1
>                borderColor:    Color gray
>                defaultTarget:  a TheWorldMenu
>                selectedItem:   a ToggleMenuItemMorph(1516)'Class Browser'
>                stayUp:         false
>                popUpOwner:     a ToggleMenuItemMorph(2693)'Tools'
>                activeSubMenu:  nil
>                activatorDockingBar:    nil
>                embeddable:     nil
>
> MenuMorph>>handleFocusEvent:
>        Receiver: a MenuMorph(1298)
>        Arguments and temporary variables:
>                evt:    [835@167 mouseUp 23822953 nil]
>        Receiver's instance variables:
>                bounds:         791@161 corner: 933@336
>                owner:  nil
>                submorphs:      an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
> ToggleMenuItem...etc...
>                fullBounds:     791@161 corner: 934@337
>                color:  (Color r: 0.871 g: 0.871 b: 0.871)
>                extension:      a MorphExtension (4004) [other:  (basicColor -> (Color
> r: 0.784 g: 0...etc...
>                borderWidth:    1
>                borderColor:    Color gray
>                defaultTarget:  a TheWorldMenu
>                selectedItem:   a ToggleMenuItemMorph(1516)'Class Browser'
>                stayUp:         false
>                popUpOwner:     a ToggleMenuItemMorph(2693)'Tools'
>                activeSubMenu:  nil
>                activatorDockingBar:    nil
>                embeddable:     nil
>
> [] in HandMorph>>sendFocusEvent:to:clear:
>        Receiver: a HandMorph(3216)
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                focusHolder:    a MenuMorph(1298)
>                result:         #(nil)
>        Receiver's instance variables:
>                bounds:         709@476 corner: 725@492
>                owner:  a PasteUpMorph(1622) [world]
>                submorphs:      #()
>                fullBounds:     709@476 corner: 725@492
>                color:  Color blue
>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>                mouseFocus:     nil
>                keyboardFocus:  nil
>                eventListeners:         nil
>                mouseListeners:         nil
>                keyboardListeners:      nil
>                mouseClickState:        nil
>                mouseOverHandler:       a MouseOverHandler
>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>                targetOffset:   17@12
>                damageRecorder:         a DamageRecorder
>                cacheCanvas:    nil
>                cachedCanvasHasHoles:   true
>                temporaryCursor:        nil
>                temporaryCursorOffset:  nil
>                hardwareCursor:         nil
>                hasChanged:     true
>                savedPatch:     nil
>                userInitials:   ''
>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>                lastKeyScanCode:        77
>                combinedChar:   nil
>
> [] in PasteUpMorph>>becomeActiveDuring:
>        Receiver: a PasteUpMorph(1622) [world]
>        Arguments and temporary variables:
>                aBlock:         [closure] in HandMorph>>sendFocusEvent:to:clear:
>        Receiver's instance variables:
>                bounds:         0@0 corner: 1280@751
>                owner:  nil
>                submorphs:      an Array(a TaskbarMorph(3095) a SystemWindow(770) a
> SystemWindow(359...etc...
>                fullBounds:     0@0 corner: 1280@751
>                color:  (Color r: 0.97 g: 0.98 b: 1.0)
>                extension:      a MorphExtension (2543) [eventHandler = an EventHandler]
>  [other:  (...etc...
>                borderWidth:    0
>                borderColor:    (Color r: 0.03 g: 0.02 b: 0.0)
>                model:  a MorphicModel(1926)
>                cursor:         1
>                padding:        3
>                backgroundMorph:        nil
>                isPartsBin:     nil
>                autoLineLayout:         false
>                indicateCursor:         nil
>                resizeToFit:    nil
>                worldState:     a WorldState
>                griddingOn:     nil
>
> BlockClosure>>on:do:
>        Receiver: [closure] in PasteUpMorph>>becomeActiveDuring:
>        Arguments and temporary variables:
>                exception:      Error
>                handlerAction:  [closure] in PasteUpMorph>>becomeActiveDuring:
>                handlerActive:  false
>        Receiver's instance variables:
>                outerContext:   PasteUpMorph>>becomeActiveDuring:
>                startpc:        67
>                numArgs:        0
>
> PasteUpMorph>>becomeActiveDuring:
>        Receiver: a PasteUpMorph(1622) [world]
>        Arguments and temporary variables:
>                aBlock:         [closure] in HandMorph>>sendFocusEvent:to:clear:
>                priorWorld:     a PasteUpMorph(1622) [world]
>                priorHand:      a HandMorph(3216)
>                priorEvent:     [835@167 mouseOver red nil nil]
>        Receiver's instance variables:
>                bounds:         0@0 corner: 1280@751
>                owner:  nil
>                submorphs:      an Array(a TaskbarMorph(3095) a SystemWindow(770) a
> SystemWindow(359...etc...
>                fullBounds:     0@0 corner: 1280@751
>                color:  (Color r: 0.97 g: 0.98 b: 1.0)
>                extension:      a MorphExtension (2543) [eventHandler = an EventHandler]
>  [other:  (...etc...
>                borderWidth:    0
>                borderColor:    (Color r: 0.03 g: 0.02 b: 0.0)
>                model:  a MorphicModel(1926)
>                cursor:         1
>                padding:        3
>                backgroundMorph:        nil
>                isPartsBin:     nil
>                autoLineLayout:         false
>                indicateCursor:         nil
>                resizeToFit:    nil
>                worldState:     a WorldState
>                griddingOn:     nil
>
> HandMorph>>sendFocusEvent:to:clear:
>        Receiver: a HandMorph(3216)
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                focusHolder:    a MenuMorph(1298)
>                aBlock:         [closure] in HandMorph>>sendMouseEvent:
>                w:      a PasteUpMorph(1622) [world]
>                result:         #(nil)
>        Receiver's instance variables:
>                bounds:         709@476 corner: 725@492
>                owner:  a PasteUpMorph(1622) [world]
>                submorphs:      #()
>                fullBounds:     709@476 corner: 725@492
>                color:  Color blue
>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>                mouseFocus:     nil
>                keyboardFocus:  nil
>                eventListeners:         nil
>                mouseListeners:         nil
>                keyboardListeners:      nil
>                mouseClickState:        nil
>                mouseOverHandler:       a MouseOverHandler
>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>                targetOffset:   17@12
>                damageRecorder:         a DamageRecorder
>                cacheCanvas:    nil
>                cachedCanvasHasHoles:   true
>                temporaryCursor:        nil
>                temporaryCursorOffset:  nil
>                hardwareCursor:         nil
>                hasChanged:     true
>                savedPatch:     nil
>                userInitials:   ''
>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>                lastKeyScanCode:        77
>                combinedChar:   nil
>
> HandMorph>>sendEvent:focus:clear:
>        Receiver: a HandMorph(3216)
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                focusHolder:    a MenuMorph(1298)
>                aBlock:         [closure] in HandMorph>>sendMouseEvent:
>                result:         nil
>        Receiver's instance variables:
>                bounds:         709@476 corner: 725@492
>                owner:  a PasteUpMorph(1622) [world]
>                submorphs:      #()
>                fullBounds:     709@476 corner: 725@492
>                color:  Color blue
>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>                mouseFocus:     nil
>                keyboardFocus:  nil
>                eventListeners:         nil
>                mouseListeners:         nil
>                keyboardListeners:      nil
>                mouseClickState:        nil
>                mouseOverHandler:       a MouseOverHandler
>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>                targetOffset:   17@12
>                damageRecorder:         a DamageRecorder
>                cacheCanvas:    nil
>                cachedCanvasHasHoles:   true
>                temporaryCursor:        nil
>                temporaryCursorOffset:  nil
>                hardwareCursor:         nil
>                hasChanged:     true
>                savedPatch:     nil
>                userInitials:   ''
>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>                lastKeyScanCode:        77
>                combinedChar:   nil
>
> HandMorph>>sendMouseEvent:
>        Receiver: a HandMorph(3216)
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>        Receiver's instance variables:
>                bounds:         709@476 corner: 725@492
>                owner:  a PasteUpMorph(1622) [world]
>                submorphs:      #()
>                fullBounds:     709@476 corner: 725@492
>                color:  Color blue
>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>                mouseFocus:     nil
>                keyboardFocus:  nil
>                eventListeners:         nil
>                mouseListeners:         nil
>                keyboardListeners:      nil
>                mouseClickState:        nil
>                mouseOverHandler:       a MouseOverHandler
>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>                targetOffset:   17@12
>                damageRecorder:         a DamageRecorder
>                cacheCanvas:    nil
>                cachedCanvasHasHoles:   true
>                temporaryCursor:        nil
>                temporaryCursorOffset:  nil
>                hardwareCursor:         nil
>                hasChanged:     true
>                savedPatch:     nil
>                userInitials:   ''
>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>                lastKeyScanCode:        77
>                combinedChar:   nil
>
> HandMorph>>handleEvent:
>        Receiver: a HandMorph(3216)
>        Arguments and temporary variables:
>                anEvent:        [835@167 mouseUp 23822953 nil]
>                evt:    [835@167 mouseUp 23822953 nil]
>                ofs:    nil
>        Receiver's instance variables:
>                bounds:         709@476 corner: 725@492
>                owner:  a PasteUpMorph(1622) [world]
>                submorphs:      #()
>                fullBounds:     709@476 corner: 725@492
>                color:  Color blue
>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>                mouseFocus:     nil
>                keyboardFocus:  nil
>                eventListeners:         nil
>                mouseListeners:         nil
>                keyboardListeners:      nil
>                mouseClickState:        nil
>                mouseOverHandler:       a MouseOverHandler
>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>                targetOffset:   17@12
>                damageRecorder:         a DamageRecorder
>                cacheCanvas:    nil
>                cachedCanvasHasHoles:   true
>                temporaryCursor:        nil
>                temporaryCursorOffset:  nil
>                hardwareCursor:         nil
>                hasChanged:     true
>                savedPatch:     nil
>                userInitials:   ''
>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>                lastKeyScanCode:        77
>                combinedChar:   nil
>
> HandMorph>>processEvents
>        Receiver: a HandMorph(3216)
>        Arguments and temporary variables:
>                evt:    [835@167 mouseUp 23822953 nil]
>                evtBuf:         #(1 23822953 835 167 0 0 0 1)
>                type:   1
>                hadAny:         false
>        Receiver's instance variables:
>                bounds:         709@476 corner: 725@492
>                owner:  a PasteUpMorph(1622) [world]
>                submorphs:      #()
>                fullBounds:     709@476 corner: 725@492
>                color:  Color blue
>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>                mouseFocus:     nil
>                keyboardFocus:  nil
>                eventListeners:         nil
>                mouseListeners:         nil
>                keyboardListeners:      nil
>                mouseClickState:        nil
>                mouseOverHandler:       a MouseOverHandler
>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>                targetOffset:   17@12
>                damageRecorder:         a DamageRecorder
>                cacheCanvas:    nil
>                cachedCanvasHasHoles:   true
>                temporaryCursor:        nil
>                temporaryCursorOffset:  nil
>                hardwareCursor:         nil
>                hasChanged:     true
>                savedPatch:     nil
>                userInitials:   ''
>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>                lastKeyScanCode:        77
>                combinedChar:   nil
>
> [] in WorldState>>doOneCycleNowFor:
>        Receiver: a WorldState
>        Arguments and temporary variables:
>                h:      a HandMorph(3216)
>        Receiver's instance variables:
>                hands:  an Array(a HandMorph(3216))
>                viewBox:        0@0 corner: 1280@751
>                canvas:         a FormCanvas on: DisplayScreen(1280x751x32)
>                damageRecorder:         a DamageRecorder
>                stepList:       a Heap(StepMessage(#stepAt: -> a SystemWindow(770))(a
> SystemWindow(77...etc...
>                lastStepTime:   23973261
>                lastStepMessage:        nil
>                lastCycleTime:  23973183
>                commandHistory:         a CommandHistory
>                alarms:         a Heap()
>                lastAlarmTime:  23973261
>
> Array(SequenceableCollection)>>do:
>        Receiver: an Array(a HandMorph(3216))
>        Arguments and temporary variables:
>                aBlock:         [closure] in WorldState>>doOneCycleNowFor:
>                index:  1
>                indexLimiT:     1
>        Receiver's instance variables:
> an Array(a HandMorph(3216))
>
>
> --- The full stack ---
> OBShoutPlatform(Object)>>doesNotUnderstand: #build:
> OBShoutPlatform(OBMorphicPlatform)>>handleBrowseRequest:
> OBBrowseRequest>>handleWith:
> OBBrowseRequest(OBInteractionRequest)>>defaultAction
> UndefinedObject>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> OBBrowseRequest(Exception)>>signal
> OBBrowseRequest class>>signal:
> OBSystemBrowser(OBBrowser)>>open
> OBSystemBrowser class(OBBrowser class)>>open
> OBSystemBrowserAdaptor class>>open
> StandardToolSet class>>openClassBrowser
> [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
> BlockClosure>>ensure:
> CursorWithMask(Cursor)>>showWhile:
> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
> MouseButtonEvent>>sentTo:
> ToggleMenuItemMorph(Morph)>>handleEvent:
> MorphicEventDispatcher>>dispatchDefault:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> ToggleMenuItemMorph(Morph)>>processEvent:using:
> MorphicEventDispatcher>>dispatchDefault:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> MenuMorph(Morph)>>processEvent:using:
> MenuMorph(Morph)>>processEvent:
> MenuMorph>>handleFocusEvent:
> [] in HandMorph>>sendFocusEvent:to:clear:
> [] in PasteUpMorph>>becomeActiveDuring:
> BlockClosure>>on:do:
> PasteUpMorph>>becomeActiveDuring:
> HandMorph>>sendFocusEvent:to:clear:
> HandMorph>>sendEvent:focus:clear:
> HandMorph>>sendMouseEvent:
> HandMorph>>handleEvent:
> HandMorph>>processEvents
> [] in WorldState>>doOneCycleNowFor:
> Array(SequenceableCollection)>>do:
>  - - - - - - - - - - - - - - -
>                        - - - - - - - - - - - - - - - - - -
> WorldState>>handsDo:
> WorldState>>doOneCycleNowFor:
> WorldState>>doOneCycleFor:
> PasteUpMorph>>doOneCycle
> [] in Project class>>spawnNewProcess
> [] in BlockClosure>>newProcess
>
> Hernán
>
> _______________________________________________
> Pharo-project mailing list
> [hidden email]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project



--
Lukas Renggli
http://www.lukas-renggli.ch

_______________________________________________
Pharo-project mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
Reply | Threaded
Open this post in threaded view
|

Re: Latest OB broken in PharoCore

hernanmd
Thanks Lukas, maybe that RewriteTools wiki page should be updated?
Cheers,

Hernán

2009/12/17 Lukas Renggli <[hidden email]>:

> If you load OB-Shout you also need to load the underlying support for Shout.
>
> Gofer new
>        renggli: 'unsorted';
>        package: 'Shout';
>        package: 'RoelTyper';
>        package: 'ECompletion';
>        package: 'ECompletionOmniBrowser';
>        load.
>
> Generally RB and OB doesn't work on 1.1 yet, so you are on shaky grounds.
>
> Lukas
>
> 2009/12/17 Hernán Morales Durand <[hidden email]>:
>> Hi,
>>  I've installed OB with the following script (from
>> http://code.google.com/p/pharo/wiki/RewriteTools) in Pharo-Core:
>>
>> Gofer new
>>        squeaksource: 'rb';
>>        addPackage: 'AST-Core';
>>        addPackage: 'Refactoring-Core';
>>        addPackage: 'Refactoring-Spelling';
>>        renggli: 'omnibrowser';
>>        addPackage: 'OmniBrowser';
>>        addPackage: 'OB-Standard';
>>        addPackage: 'OB-Morphic';
>>        addPackage: 'OB-Shout';
>>        addPackage: 'OB-Refactory';
>>        addPackage: 'OB-Regex';
>>        load.
>>
>> but when opening an OB system browser there is a MNU related with
>> OBShoutPlatform:
>>
>> 17 December 2009 2:21:19 pm
>>
>> VM: Win32 - IX86 - NT - Squeak3.10.2 of '5 June 2008' [latest update: #7179]
>> Image: PharoCore1.1ALPHA [Latest update: #11106]
>>
>> SecurityManager state:
>> Restricted: false
>> FileAccess: true
>> SocketAccess: true
>>
>> OBShoutPlatform(Object)>>doesNotUnderstand: #build:
>>        Receiver: an OBShoutPlatform
>>        Arguments and temporary variables:
>>                aMessage:       build: an OBSystemBrowser
>>                exception:      MessageNotUnderstood: OBShoutPlatform>>build:
>>                resumeValue:    nil
>>        Receiver's instance variables:
>> an OBShoutPlatform
>>
>> OBShoutPlatform(OBMorphicPlatform)>>handleBrowseRequest:
>>        Receiver: an OBShoutPlatform
>>        Arguments and temporary variables:
>>                request:        OBBrowseRequest
>>        Receiver's instance variables:
>> an OBShoutPlatform
>>
>> OBBrowseRequest>>handleWith:
>>        Receiver: OBBrowseRequest
>>        Arguments and temporary variables:
>>                anObject:       an OBShoutPlatform
>>        Receiver's instance variables:
>>                messageText:    nil
>>                tag:    nil
>>                signalContext:  OBBrowseRequest(Exception)>>signal
>>                handlerContext:         nil
>>                outerContext:   nil
>>                browser:        an OBSystemBrowser
>>
>> OBBrowseRequest(OBInteractionRequest)>>defaultAction
>>        Receiver: OBBrowseRequest
>>        Arguments and temporary variables:
>>
>>        Receiver's instance variables:
>>                messageText:    nil
>>                tag:    nil
>>                signalContext:  OBBrowseRequest(Exception)>>signal
>>                handlerContext:         nil
>>                outerContext:   nil
>>                browser:        an OBSystemBrowser
>>
>> UndefinedObject>>handleSignal:
>>        Receiver: nil
>>        Arguments and temporary variables:
>>                exception:      OBBrowseRequest
>>        Receiver's instance variables:
>> nil
>>
>> MethodContext(ContextPart)>>handleSignal:
>>        Receiver: BlockClosure>>on:do:
>>        Arguments and temporary variables:
>>                exception:      OBBrowseRequest
>>                val:    nil
>>        Receiver's instance variables:
>>                sender:         PasteUpMorph>>becomeActiveDuring:
>>                pc:     17
>>                stackp:         3
>>                method:         (BlockClosure>>#on:do: "a CompiledMethod(3772)")
>>                closureOrNil:   nil
>>                receiver:       [closure] in PasteUpMorph>>becomeActiveDuring:
>>
>> OBBrowseRequest(Exception)>>signal
>>        Receiver: OBBrowseRequest
>>        Arguments and temporary variables:
>>
>>        Receiver's instance variables:
>>                messageText:    nil
>>                tag:    nil
>>                signalContext:  OBBrowseRequest(Exception)>>signal
>>                handlerContext:         nil
>>                outerContext:   nil
>>                browser:        an OBSystemBrowser
>>
>> OBBrowseRequest class>>signal:
>>        Receiver: OBBrowseRequest
>>        Arguments and temporary variables:
>>                aBrowser:       an OBSystemBrowser
>>        Receiver's instance variables:
>>                superclass:     OBInteractionRequest
>>                methodDict:     a MethodDictionary(#browser->(OBBrowseRequest>>#browser
>> "a Compiled...etc...
>>                format:         142
>>                instanceVariables:      #('browser')
>>                organization:   ('accessing' browser browser:)
>> ('dispatching' handleWith:)
>> ('test...etc...
>>                subclasses:     nil
>>                name:   #OBBrowseRequest
>>                classPool:      nil
>>                sharedPools:    nil
>>                environment:    Smalltalk
>>                category:       #'OmniBrowser-Notifications'
>>                traitComposition:       {}
>>                localSelectors:         nil
>>
>> OBSystemBrowser(OBBrowser)>>open
>>        Receiver: an OBSystemBrowser
>>        Arguments and temporary variables:
>>
>>        Receiver's instance variables:
>>                panels:         an OrderedCollection(an OBColumnPanel an OBFixedButtonPanel
>> an OBDefini...etc...
>>                announcer:      an OBAnnouncer
>>                cmdFactories:   {OBCmdRemoveClass. ORCmdFormat. OBCmdRevertMethod.
>> OBCmdRenameCat...etc...
>>                hasChanges:     nil
>>
>> OBSystemBrowser class(OBBrowser class)>>open
>>        Receiver: OBSystemBrowser
>>        Arguments and temporary variables:
>>
>>        Receiver's instance variables:
>>                superclass:     OBCodeBrowser
>>                methodDict:     a
>> MethodDictionary(#defaultBackgroundColor->(OBSystemBrowser>>#defa...etc...
>>                format:         138
>>                instanceVariables:      nil
>>                organization:   ('morphic' defaultBackgroundColor labelString)
>> ('testing' isClass...etc...
>>                subclasses:     nil
>>                name:   #OBSystemBrowser
>>                classPool:      nil
>>                sharedPools:    nil
>>                environment:    Smalltalk
>>                category:       #'OB-Standard-Browsers'
>>                traitComposition:       {}
>>                localSelectors:         nil
>>
>> OBSystemBrowserAdaptor class>>open
>>        Receiver: OBSystemBrowserAdaptor
>>        Arguments and temporary variables:
>>
>>        Receiver's instance variables:
>>                superclass:     Object
>>                methodDict:     a
>> MethodDictionary(#labelString->(OBSystemBrowserAdaptor>>#labelStr...etc...
>>                format:         134
>>                instanceVariables:      #('class' 'selector')
>>                organization:   ('registry protocol' labelString openEditString:
>> setClass:selecto...etc...
>>                subclasses:     nil
>>                name:   #OBSystemBrowserAdaptor
>>                classPool:      nil
>>                sharedPools:    nil
>>                environment:    Smalltalk
>>                category:       #'OB-Standard-Utilities'
>>                traitComposition:       {}
>>                localSelectors:         nil
>>
>> StandardToolSet class>>openClassBrowser
>>        Receiver: StandardToolSet
>>        Arguments and temporary variables:
>>
>>        Receiver's instance variables:
>>                superclass:     Object
>>                methodDict:     a MethodDictionary()
>>                format:         2
>>                instanceVariables:      nil
>>                organization:   ('as yet unclassified')
>>
>>                subclasses:     nil
>>                name:   #StandardToolSet
>>                classPool:      nil
>>                sharedPools:    nil
>>                environment:    Smalltalk
>>                category:       #'Tools-Base'
>>                traitComposition:       nil
>>                localSelectors:         nil
>>
>> [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>>        Arguments and temporary variables:
>>                evt:    [835@167 mouseUp 23822953 nil]
>>                selArgCount:    #(0)
>>        Receiver's instance variables:
>>                bounds:         795@165 corner: 929@177
>>                owner:  a MenuMorph(1298)
>>                submorphs:      #()
>>                fullBounds:     795@165 corner: 929@177
>>                color:  Color black
>>                extension:      a MorphExtension (2377)
>>                font:   a StrikeFontSet(Accuny12 12)
>>                emphasis:       0
>>                contents:       'Class Browser'
>>                hasFocus:       false
>>                isEnabled:      true
>>                subMenu:        nil
>>                isSelected:     false
>>                target:         StandardToolSet
>>                selector:       #openClassBrowser
>>                arguments:      #()
>>                icon:   nil
>>                getStateSelector:       nil
>>                enablementSelector:     nil
>>                keyText:        nil
>>
>> BlockClosure>>ensure:
>>        Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>>        Arguments and temporary variables:
>>                aBlock:         [closure] in CursorWithMask(Cursor)>>showWhile:
>>                returnValue:    nil
>>                b:      nil
>>        Receiver's instance variables:
>>                outerContext:   ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>>                startpc:        136
>>                numArgs:        0
>>
>> CursorWithMask(Cursor)>>showWhile:
>>        Receiver: ((CursorWithMask
>>        extent: 16@16
>>        depth: 1
>>        fromArray: #(
>>                2r0
>>                2r10000000000000000000000...etc...
>>        Arguments and temporary variables:
>>                aBlock:         [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>>                oldcursor:      ((CursorWithMask
>>        extent: 16@16
>>        depth: 1
>>        fromArray: #(
>>                2r0
>>                2r1...etc...
>>        Receiver's instance variables:
>>                bits:   a Bitmap of length 16
>>                width:  16
>>                height:         16
>>                depth:  1
>>                offset:         -1@-1
>>                maskForm:       Form(16x16x1)
>>
>> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>>        Arguments and temporary variables:
>>                evt:    [835@167 mouseUp 23822953 nil]
>>                w:      a PasteUpMorph(1622) [world]
>>                selArgCount:    #(0)
>>        Receiver's instance variables:
>>                bounds:         795@165 corner: 929@177
>>                owner:  a MenuMorph(1298)
>>                submorphs:      #()
>>                fullBounds:     795@165 corner: 929@177
>>                color:  Color black
>>                extension:      a MorphExtension (2377)
>>                font:   a StrikeFontSet(Accuny12 12)
>>                emphasis:       0
>>                contents:       'Class Browser'
>>                hasFocus:       false
>>                isEnabled:      true
>>                subMenu:        nil
>>                isSelected:     false
>>                target:         StandardToolSet
>>                selector:       #openClassBrowser
>>                arguments:      #()
>>                icon:   nil
>>                getStateSelector:       nil
>>                enablementSelector:     nil
>>                keyText:        nil
>>
>> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
>>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>>        Arguments and temporary variables:
>>                evt:    [835@167 mouseUp 23822953 nil]
>>        Receiver's instance variables:
>>                bounds:         795@165 corner: 929@177
>>                owner:  a MenuMorph(1298)
>>                submorphs:      #()
>>                fullBounds:     795@165 corner: 929@177
>>                color:  Color black
>>                extension:      a MorphExtension (2377)
>>                font:   a StrikeFontSet(Accuny12 12)
>>                emphasis:       0
>>                contents:       'Class Browser'
>>                hasFocus:       false
>>                isEnabled:      true
>>                subMenu:        nil
>>                isSelected:     false
>>                target:         StandardToolSet
>>                selector:       #openClassBrowser
>>                arguments:      #()
>>                icon:   nil
>>                getStateSelector:       nil
>>                enablementSelector:     nil
>>                keyText:        nil
>>
>> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
>>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>        Receiver's instance variables:
>>                bounds:         795@165 corner: 929@177
>>                owner:  a MenuMorph(1298)
>>                submorphs:      #()
>>                fullBounds:     795@165 corner: 929@177
>>                color:  Color black
>>                extension:      a MorphExtension (2377)
>>                font:   a StrikeFontSet(Accuny12 12)
>>                emphasis:       0
>>                contents:       'Class Browser'
>>                hasFocus:       false
>>                isEnabled:      true
>>                subMenu:        nil
>>                isSelected:     false
>>                target:         StandardToolSet
>>                selector:       #openClassBrowser
>>                arguments:      #()
>>                icon:   nil
>>                getStateSelector:       nil
>>                enablementSelector:     nil
>>                keyText:        nil
>>
>> MouseButtonEvent>>sentTo:
>>        Receiver: [835@167 mouseUp 23822953 nil]
>>        Arguments and temporary variables:
>>                anObject:       a ToggleMenuItemMorph(1516)'Class Browser'
>>        Receiver's instance variables:
>>                timeStamp:      23822953
>>                source:         a HandMorph(3216)
>>                windowIndex:    nil
>>                type:   #mouseUp
>>                buttons:        0
>>                position:       835@167
>>                handler:        nil
>>                wasHandled:     true
>>                whichButton:    4
>>
>> ToggleMenuItemMorph(Morph)>>handleEvent:
>>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>        Receiver's instance variables:
>>                bounds:         795@165 corner: 929@177
>>                owner:  a MenuMorph(1298)
>>                submorphs:      #()
>>                fullBounds:     795@165 corner: 929@177
>>                color:  Color black
>>                extension:      a MorphExtension (2377)
>>                font:   a StrikeFontSet(Accuny12 12)
>>                emphasis:       0
>>                contents:       'Class Browser'
>>                hasFocus:       false
>>                isEnabled:      true
>>                subMenu:        nil
>>                isSelected:     false
>>                target:         StandardToolSet
>>                selector:       #openClassBrowser
>>                arguments:      #()
>>                icon:   nil
>>                getStateSelector:       nil
>>                enablementSelector:     nil
>>                keyText:        nil
>>
>> MorphicEventDispatcher>>dispatchDefault:with:
>>        Receiver: a MorphicEventDispatcher
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                aMorph:         a ToggleMenuItemMorph(1516)'Class Browser'
>>                localEvt:       nil
>>                index:  1
>>                child:  nil
>>                morphs:         #()
>>                inside:         true
>>        Receiver's instance variables:
>>                lastType:       #mouseUp
>>                lastDispatch:   #dispatchDefault:with:
>>
>> MorphicEventDispatcher>>dispatchEvent:with:
>>        Receiver: a MorphicEventDispatcher
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                aMorph:         a ToggleMenuItemMorph(1516)'Class Browser'
>>        Receiver's instance variables:
>>                lastType:       #mouseUp
>>                lastDispatch:   #dispatchDefault:with:
>>
>> ToggleMenuItemMorph(Morph)>>processEvent:using:
>>        Receiver: a ToggleMenuItemMorph(1516)'Class Browser'
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                defaultDispatcher:      a MorphicEventDispatcher
>>        Receiver's instance variables:
>>                bounds:         795@165 corner: 929@177
>>                owner:  a MenuMorph(1298)
>>                submorphs:      #()
>>                fullBounds:     795@165 corner: 929@177
>>                color:  Color black
>>                extension:      a MorphExtension (2377)
>>                font:   a StrikeFontSet(Accuny12 12)
>>                emphasis:       0
>>                contents:       'Class Browser'
>>                hasFocus:       false
>>                isEnabled:      true
>>                subMenu:        nil
>>                isSelected:     false
>>                target:         StandardToolSet
>>                selector:       #openClassBrowser
>>                arguments:      #()
>>                icon:   nil
>>                getStateSelector:       nil
>>                enablementSelector:     nil
>>                keyText:        nil
>>
>> MorphicEventDispatcher>>dispatchDefault:with:
>>        Receiver: a MorphicEventDispatcher
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                aMorph:         a MenuMorph(1298)
>>                localEvt:       [835@167 mouseUp 23822953 nil]
>>                index:  1
>>                child:  a ToggleMenuItemMorph(1516)'Class Browser'
>>                morphs:         an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
>> ToggleMenuItemMor...etc...
>>                inside:         false
>>        Receiver's instance variables:
>>                lastType:       #mouseUp
>>                lastDispatch:   #dispatchDefault:with:
>>
>> MorphicEventDispatcher>>dispatchEvent:with:
>>        Receiver: a MorphicEventDispatcher
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                aMorph:         a MenuMorph(1298)
>>        Receiver's instance variables:
>>                lastType:       #mouseUp
>>                lastDispatch:   #dispatchDefault:with:
>>
>> MenuMorph(Morph)>>processEvent:using:
>>        Receiver: a MenuMorph(1298)
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                defaultDispatcher:      a MorphicEventDispatcher
>>        Receiver's instance variables:
>>                bounds:         791@161 corner: 933@336
>>                owner:  nil
>>                submorphs:      an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
>> ToggleMenuItem...etc...
>>                fullBounds:     791@161 corner: 934@337
>>                color:  (Color r: 0.871 g: 0.871 b: 0.871)
>>                extension:      a MorphExtension (4004) [other:  (basicColor -> (Color
>> r: 0.784 g: 0...etc...
>>                borderWidth:    1
>>                borderColor:    Color gray
>>                defaultTarget:  a TheWorldMenu
>>                selectedItem:   a ToggleMenuItemMorph(1516)'Class Browser'
>>                stayUp:         false
>>                popUpOwner:     a ToggleMenuItemMorph(2693)'Tools'
>>                activeSubMenu:  nil
>>                activatorDockingBar:    nil
>>                embeddable:     nil
>>
>> MenuMorph(Morph)>>processEvent:
>>        Receiver: a MenuMorph(1298)
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>        Receiver's instance variables:
>>                bounds:         791@161 corner: 933@336
>>                owner:  nil
>>                submorphs:      an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
>> ToggleMenuItem...etc...
>>                fullBounds:     791@161 corner: 934@337
>>                color:  (Color r: 0.871 g: 0.871 b: 0.871)
>>                extension:      a MorphExtension (4004) [other:  (basicColor -> (Color
>> r: 0.784 g: 0...etc...
>>                borderWidth:    1
>>                borderColor:    Color gray
>>                defaultTarget:  a TheWorldMenu
>>                selectedItem:   a ToggleMenuItemMorph(1516)'Class Browser'
>>                stayUp:         false
>>                popUpOwner:     a ToggleMenuItemMorph(2693)'Tools'
>>                activeSubMenu:  nil
>>                activatorDockingBar:    nil
>>                embeddable:     nil
>>
>> MenuMorph>>handleFocusEvent:
>>        Receiver: a MenuMorph(1298)
>>        Arguments and temporary variables:
>>                evt:    [835@167 mouseUp 23822953 nil]
>>        Receiver's instance variables:
>>                bounds:         791@161 corner: 933@336
>>                owner:  nil
>>                submorphs:      an Array(a ToggleMenuItemMorph(1516)'Class Browser' a
>> ToggleMenuItem...etc...
>>                fullBounds:     791@161 corner: 934@337
>>                color:  (Color r: 0.871 g: 0.871 b: 0.871)
>>                extension:      a MorphExtension (4004) [other:  (basicColor -> (Color
>> r: 0.784 g: 0...etc...
>>                borderWidth:    1
>>                borderColor:    Color gray
>>                defaultTarget:  a TheWorldMenu
>>                selectedItem:   a ToggleMenuItemMorph(1516)'Class Browser'
>>                stayUp:         false
>>                popUpOwner:     a ToggleMenuItemMorph(2693)'Tools'
>>                activeSubMenu:  nil
>>                activatorDockingBar:    nil
>>                embeddable:     nil
>>
>> [] in HandMorph>>sendFocusEvent:to:clear:
>>        Receiver: a HandMorph(3216)
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                focusHolder:    a MenuMorph(1298)
>>                result:         #(nil)
>>        Receiver's instance variables:
>>                bounds:         709@476 corner: 725@492
>>                owner:  a PasteUpMorph(1622) [world]
>>                submorphs:      #()
>>                fullBounds:     709@476 corner: 725@492
>>                color:  Color blue
>>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>>                mouseFocus:     nil
>>                keyboardFocus:  nil
>>                eventListeners:         nil
>>                mouseListeners:         nil
>>                keyboardListeners:      nil
>>                mouseClickState:        nil
>>                mouseOverHandler:       a MouseOverHandler
>>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>>                targetOffset:   17@12
>>                damageRecorder:         a DamageRecorder
>>                cacheCanvas:    nil
>>                cachedCanvasHasHoles:   true
>>                temporaryCursor:        nil
>>                temporaryCursorOffset:  nil
>>                hardwareCursor:         nil
>>                hasChanged:     true
>>                savedPatch:     nil
>>                userInitials:   ''
>>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>>                lastKeyScanCode:        77
>>                combinedChar:   nil
>>
>> [] in PasteUpMorph>>becomeActiveDuring:
>>        Receiver: a PasteUpMorph(1622) [world]
>>        Arguments and temporary variables:
>>                aBlock:         [closure] in HandMorph>>sendFocusEvent:to:clear:
>>        Receiver's instance variables:
>>                bounds:         0@0 corner: 1280@751
>>                owner:  nil
>>                submorphs:      an Array(a TaskbarMorph(3095) a SystemWindow(770) a
>> SystemWindow(359...etc...
>>                fullBounds:     0@0 corner: 1280@751
>>                color:  (Color r: 0.97 g: 0.98 b: 1.0)
>>                extension:      a MorphExtension (2543) [eventHandler = an EventHandler]
>>  [other:  (...etc...
>>                borderWidth:    0
>>                borderColor:    (Color r: 0.03 g: 0.02 b: 0.0)
>>                model:  a MorphicModel(1926)
>>                cursor:         1
>>                padding:        3
>>                backgroundMorph:        nil
>>                isPartsBin:     nil
>>                autoLineLayout:         false
>>                indicateCursor:         nil
>>                resizeToFit:    nil
>>                worldState:     a WorldState
>>                griddingOn:     nil
>>
>> BlockClosure>>on:do:
>>        Receiver: [closure] in PasteUpMorph>>becomeActiveDuring:
>>        Arguments and temporary variables:
>>                exception:      Error
>>                handlerAction:  [closure] in PasteUpMorph>>becomeActiveDuring:
>>                handlerActive:  false
>>        Receiver's instance variables:
>>                outerContext:   PasteUpMorph>>becomeActiveDuring:
>>                startpc:        67
>>                numArgs:        0
>>
>> PasteUpMorph>>becomeActiveDuring:
>>        Receiver: a PasteUpMorph(1622) [world]
>>        Arguments and temporary variables:
>>                aBlock:         [closure] in HandMorph>>sendFocusEvent:to:clear:
>>                priorWorld:     a PasteUpMorph(1622) [world]
>>                priorHand:      a HandMorph(3216)
>>                priorEvent:     [835@167 mouseOver red nil nil]
>>        Receiver's instance variables:
>>                bounds:         0@0 corner: 1280@751
>>                owner:  nil
>>                submorphs:      an Array(a TaskbarMorph(3095) a SystemWindow(770) a
>> SystemWindow(359...etc...
>>                fullBounds:     0@0 corner: 1280@751
>>                color:  (Color r: 0.97 g: 0.98 b: 1.0)
>>                extension:      a MorphExtension (2543) [eventHandler = an EventHandler]
>>  [other:  (...etc...
>>                borderWidth:    0
>>                borderColor:    (Color r: 0.03 g: 0.02 b: 0.0)
>>                model:  a MorphicModel(1926)
>>                cursor:         1
>>                padding:        3
>>                backgroundMorph:        nil
>>                isPartsBin:     nil
>>                autoLineLayout:         false
>>                indicateCursor:         nil
>>                resizeToFit:    nil
>>                worldState:     a WorldState
>>                griddingOn:     nil
>>
>> HandMorph>>sendFocusEvent:to:clear:
>>        Receiver: a HandMorph(3216)
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                focusHolder:    a MenuMorph(1298)
>>                aBlock:         [closure] in HandMorph>>sendMouseEvent:
>>                w:      a PasteUpMorph(1622) [world]
>>                result:         #(nil)
>>        Receiver's instance variables:
>>                bounds:         709@476 corner: 725@492
>>                owner:  a PasteUpMorph(1622) [world]
>>                submorphs:      #()
>>                fullBounds:     709@476 corner: 725@492
>>                color:  Color blue
>>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>>                mouseFocus:     nil
>>                keyboardFocus:  nil
>>                eventListeners:         nil
>>                mouseListeners:         nil
>>                keyboardListeners:      nil
>>                mouseClickState:        nil
>>                mouseOverHandler:       a MouseOverHandler
>>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>>                targetOffset:   17@12
>>                damageRecorder:         a DamageRecorder
>>                cacheCanvas:    nil
>>                cachedCanvasHasHoles:   true
>>                temporaryCursor:        nil
>>                temporaryCursorOffset:  nil
>>                hardwareCursor:         nil
>>                hasChanged:     true
>>                savedPatch:     nil
>>                userInitials:   ''
>>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>>                lastKeyScanCode:        77
>>                combinedChar:   nil
>>
>> HandMorph>>sendEvent:focus:clear:
>>        Receiver: a HandMorph(3216)
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                focusHolder:    a MenuMorph(1298)
>>                aBlock:         [closure] in HandMorph>>sendMouseEvent:
>>                result:         nil
>>        Receiver's instance variables:
>>                bounds:         709@476 corner: 725@492
>>                owner:  a PasteUpMorph(1622) [world]
>>                submorphs:      #()
>>                fullBounds:     709@476 corner: 725@492
>>                color:  Color blue
>>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>>                mouseFocus:     nil
>>                keyboardFocus:  nil
>>                eventListeners:         nil
>>                mouseListeners:         nil
>>                keyboardListeners:      nil
>>                mouseClickState:        nil
>>                mouseOverHandler:       a MouseOverHandler
>>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>>                targetOffset:   17@12
>>                damageRecorder:         a DamageRecorder
>>                cacheCanvas:    nil
>>                cachedCanvasHasHoles:   true
>>                temporaryCursor:        nil
>>                temporaryCursorOffset:  nil
>>                hardwareCursor:         nil
>>                hasChanged:     true
>>                savedPatch:     nil
>>                userInitials:   ''
>>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>>                lastKeyScanCode:        77
>>                combinedChar:   nil
>>
>> HandMorph>>sendMouseEvent:
>>        Receiver: a HandMorph(3216)
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>        Receiver's instance variables:
>>                bounds:         709@476 corner: 725@492
>>                owner:  a PasteUpMorph(1622) [world]
>>                submorphs:      #()
>>                fullBounds:     709@476 corner: 725@492
>>                color:  Color blue
>>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>>                mouseFocus:     nil
>>                keyboardFocus:  nil
>>                eventListeners:         nil
>>                mouseListeners:         nil
>>                keyboardListeners:      nil
>>                mouseClickState:        nil
>>                mouseOverHandler:       a MouseOverHandler
>>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>>                targetOffset:   17@12
>>                damageRecorder:         a DamageRecorder
>>                cacheCanvas:    nil
>>                cachedCanvasHasHoles:   true
>>                temporaryCursor:        nil
>>                temporaryCursorOffset:  nil
>>                hardwareCursor:         nil
>>                hasChanged:     true
>>                savedPatch:     nil
>>                userInitials:   ''
>>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>>                lastKeyScanCode:        77
>>                combinedChar:   nil
>>
>> HandMorph>>handleEvent:
>>        Receiver: a HandMorph(3216)
>>        Arguments and temporary variables:
>>                anEvent:        [835@167 mouseUp 23822953 nil]
>>                evt:    [835@167 mouseUp 23822953 nil]
>>                ofs:    nil
>>        Receiver's instance variables:
>>                bounds:         709@476 corner: 725@492
>>                owner:  a PasteUpMorph(1622) [world]
>>                submorphs:      #()
>>                fullBounds:     709@476 corner: 725@492
>>                color:  Color blue
>>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>>                mouseFocus:     nil
>>                keyboardFocus:  nil
>>                eventListeners:         nil
>>                mouseListeners:         nil
>>                keyboardListeners:      nil
>>                mouseClickState:        nil
>>                mouseOverHandler:       a MouseOverHandler
>>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>>                targetOffset:   17@12
>>                damageRecorder:         a DamageRecorder
>>                cacheCanvas:    nil
>>                cachedCanvasHasHoles:   true
>>                temporaryCursor:        nil
>>                temporaryCursorOffset:  nil
>>                hardwareCursor:         nil
>>                hasChanged:     true
>>                savedPatch:     nil
>>                userInitials:   ''
>>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>>                lastKeyScanCode:        77
>>                combinedChar:   nil
>>
>> HandMorph>>processEvents
>>        Receiver: a HandMorph(3216)
>>        Arguments and temporary variables:
>>                evt:    [835@167 mouseUp 23822953 nil]
>>                evtBuf:         #(1 23822953 835 167 0 0 0 1)
>>                type:   1
>>                hadAny:         false
>>        Receiver's instance variables:
>>                bounds:         709@476 corner: 725@492
>>                owner:  a PasteUpMorph(1622) [world]
>>                submorphs:      #()
>>                fullBounds:     709@476 corner: 725@492
>>                color:  Color blue
>>                extension:      a MorphExtension (539) [eventHandler = an EventHandler]
>>                mouseFocus:     nil
>>                keyboardFocus:  nil
>>                eventListeners:         nil
>>                mouseListeners:         nil
>>                keyboardListeners:      nil
>>                mouseClickState:        nil
>>                mouseOverHandler:       a MouseOverHandler
>>                lastMouseEvent:         [709@476 mouseUp 23973171 nil]
>>                targetOffset:   17@12
>>                damageRecorder:         a DamageRecorder
>>                cacheCanvas:    nil
>>                cachedCanvasHasHoles:   true
>>                temporaryCursor:        nil
>>                temporaryCursorOffset:  nil
>>                hardwareCursor:         nil
>>                hasChanged:     true
>>                savedPatch:     nil
>>                userInitials:   ''
>>                lastEventBuffer:        #(1 23973171 709 476 0 0 0 1)
>>                lastKeyScanCode:        77
>>                combinedChar:   nil
>>
>> [] in WorldState>>doOneCycleNowFor:
>>        Receiver: a WorldState
>>        Arguments and temporary variables:
>>                h:      a HandMorph(3216)
>>        Receiver's instance variables:
>>                hands:  an Array(a HandMorph(3216))
>>                viewBox:        0@0 corner: 1280@751
>>                canvas:         a FormCanvas on: DisplayScreen(1280x751x32)
>>                damageRecorder:         a DamageRecorder
>>                stepList:       a Heap(StepMessage(#stepAt: -> a SystemWindow(770))(a
>> SystemWindow(77...etc...
>>                lastStepTime:   23973261
>>                lastStepMessage:        nil
>>                lastCycleTime:  23973183
>>                commandHistory:         a CommandHistory
>>                alarms:         a Heap()
>>                lastAlarmTime:  23973261
>>
>> Array(SequenceableCollection)>>do:
>>        Receiver: an Array(a HandMorph(3216))
>>        Arguments and temporary variables:
>>                aBlock:         [closure] in WorldState>>doOneCycleNowFor:
>>                index:  1
>>                indexLimiT:     1
>>        Receiver's instance variables:
>> an Array(a HandMorph(3216))
>>
>>
>> --- The full stack ---
>> OBShoutPlatform(Object)>>doesNotUnderstand: #build:
>> OBShoutPlatform(OBMorphicPlatform)>>handleBrowseRequest:
>> OBBrowseRequest>>handleWith:
>> OBBrowseRequest(OBInteractionRequest)>>defaultAction
>> UndefinedObject>>handleSignal:
>> MethodContext(ContextPart)>>handleSignal:
>> OBBrowseRequest(Exception)>>signal
>> OBBrowseRequest class>>signal:
>> OBSystemBrowser(OBBrowser)>>open
>> OBSystemBrowser class(OBBrowser class)>>open
>> OBSystemBrowserAdaptor class>>open
>> StandardToolSet class>>openClassBrowser
>> [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>> BlockClosure>>ensure:
>> CursorWithMask(Cursor)>>showWhile:
>> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
>> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
>> MouseButtonEvent>>sentTo:
>> ToggleMenuItemMorph(Morph)>>handleEvent:
>> MorphicEventDispatcher>>dispatchDefault:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> ToggleMenuItemMorph(Morph)>>processEvent:using:
>> MorphicEventDispatcher>>dispatchDefault:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> MenuMorph(Morph)>>processEvent:using:
>> MenuMorph(Morph)>>processEvent:
>> MenuMorph>>handleFocusEvent:
>> [] in HandMorph>>sendFocusEvent:to:clear:
>> [] in PasteUpMorph>>becomeActiveDuring:
>> BlockClosure>>on:do:
>> PasteUpMorph>>becomeActiveDuring:
>> HandMorph>>sendFocusEvent:to:clear:
>> HandMorph>>sendEvent:focus:clear:
>> HandMorph>>sendMouseEvent:
>> HandMorph>>handleEvent:
>> HandMorph>>processEvents
>> [] in WorldState>>doOneCycleNowFor:
>> Array(SequenceableCollection)>>do:
>>  - - - - - - - - - - - - - - -
>>                        - - - - - - - - - - - - - - - - - -
>> WorldState>>handsDo:
>> WorldState>>doOneCycleNowFor:
>> WorldState>>doOneCycleFor:
>> PasteUpMorph>>doOneCycle
>> [] in Project class>>spawnNewProcess
>> [] in BlockClosure>>newProcess
>>
>> Hernán
>>
>> _______________________________________________
>> Pharo-project mailing list
>> [hidden email]
>> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>
>
>
> --
> Lukas Renggli
> http://www.lukas-renggli.ch
>
> _______________________________________________
> Pharo-project mailing list
> [hidden email]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>
_______________________________________________
Pharo-project mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project