I'm looking at this now. Cheers, Andrei
On Wed, Jan 7, 2015 at 2:26 PM, Alexandre Bergel <[email protected]> wrote: > You also need Glamour-Roassal2-Presentations. But the last version does > not seem to load. > > Any idea how to fix this situation? > > Cheers, > Alexandre > -- > _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: > Alexandre Bergel http://www.bergel.eu > ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. > > > > > On Jan 7, 2015, at 10:22 AM, Sven Van Caekenberghe <[email protected]> wrote: > > > > Thx. > > > > I loaded GT-InspectorExtensions-CoreRoassal-AndreiChis.25 > > > > but then I get > > > > Author: SvenVanCaekenberghe > > Date: 2015-01-07T14:20:37.659713+01:00 > > > > GLMCompositePresentation(Object)>>doesNotUnderstand: #roassal2 > > RTView>>gtInspectorViewIn: > > [ :eachPragma | > > (eachPragma selector findTokens: $:) size = 1 > > ifTrue: [ self perform: eachPragma selector with: composite ]. > > (eachPragma selector findTokens: $:) size = 2 > > ifTrue: [ self perform: eachPragma selector with: composite with: > aGTInspector ] ] in RTView(Object)>>gtInspectorPresentationsIn:inContext: > > Array(SequenceableCollection)>>do: > > RTView(Object)>>gtInspectorPresentationsIn:inContext: > > [ :d | each gtInspectorPresentationsIn: d inContext: self ] in [ :x | > (GLMCompositePresentation new with: [ :d | each gtInspectorPresentationsIn: > d inContext: self ]) startOn: x ] in [ :a :each | > > a title: [ self printObjectAsAnItem: each ]. > > a dynamicActions: [ :aPresentation | each gtInspectorActions > asOrderedCollection ]. > > a titleAction: [ :aPresentation | self closeActionFor: aPresentation ]. > > a dynamic > > display: [ :x | (GLMCompositePresentation new with: [ :d | each > gtInspectorPresentationsIn: d inContext: self ]) startOn: x ] ] in [ > :browser | > > browser fixedSizePanes: self class numberOfInspectorPanes. > > browser > > show: [ :a :each | > > a title: [ self printObjectAsAnItem: each ]. > > a dynamicActions: [ :aPresentation | each > gtInspectorActions asOrderedCollection ]. > > a titleAction: [ :aPresentation | self closeActionFor: > aPresentation ]. > > a dynamic > > display: [ :x | (GLMCompositePresentation new > with: [ :d | each gtInspectorPresentationsIn: d inContext: self ]) startOn: > x ] ] ] in GTInspector>>compose > > GLMCompositePresentation(GLMPresentation)>>with: > > [ :x | (GLMCompositePresentation new with: [ :d | each > gtInspectorPresentationsIn: d inContext: self ]) startOn: x ] in [ :a :each > | > > a title: [ self printObjectAsAnItem: each ]. > > a dynamicActions: [ :aPresentation | each gtInspectorActions > asOrderedCollection ]. > > a titleAction: [ :aPresentation | self closeActionFor: aPresentation ]. > > a dynamic > > display: [ :x | (GLMCompositePresentation new with: [ :d | each > gtInspectorPresentationsIn: d inContext: self ]) startOn: x ] ] in [ > :browser | > > browser fixedSizePanes: self class numberOfInspectorPanes. > > browser > > show: [ :a :each | > > a title: [ self printObjectAsAnItem: each ]. > > a dynamicActions: [ :aPresentation | each > gtInspectorActions asOrderedCollection ]. > > a titleAction: [ :aPresentation | self closeActionFor: > aPresentation ]. > > a dynamic > > display: [ :x | (GLMCompositePresentation new > with: [ :d | each gtInspectorPresentationsIn: d inContext: self ]) startOn: > x ] ] ] in GTInspector>>compose > > BlockClosure>>glamourValueWithArgs: > > BlockClosure(Object)>>glamourValue: > > GLMDynamicPresentation(GLMPresentation)>>displayValue > > GLMDynamicPresentation>>currentPresentation > > GLMMorphicDynamicRenderer>>render: > > GLMMorphicDynamicRenderer class(GLMMorphicWidgetRenderer > class)>>render:from: > > GLMMorphicRenderer>>renderDynamicPresentation: > > GLMDynamicPresentation>>renderGlamorouslyOn: > > GLMMorphicRenderer(GLMRenderer)>>render: > > GLMMorphicTabbedRenderer(GLMMorphicWidgetRenderer)>>renderObject: > > GLMMorphicTabbedRenderer(GLMMorphicWidgetRenderer)>>renderWithTitleOrNil: > > GLMMorphicTabbedRenderer>>render: > > GLMMorphicTabbedRenderer class(GLMMorphicWidgetRenderer > class)>>render:from: > > GLMMorphicRenderer>>renderTabbedCompositePresentation: > > GLMTabbedArrangement>>renderGlamorouslyOn: > > GLMCompositePresentation>>renderGlamorouslyOn: > > GLMMorphicRenderer(GLMRenderer)>>render: > > GLMMorphicPaneRenderer(GLMMorphicWidgetRenderer)>>renderObject: > > GLMMorphicPaneRenderer>>renderContainerFor: > > GLMMorphicPaneRenderer>>render: > > GLMMorphicPaneRenderer class(GLMMorphicWidgetRenderer > class)>>render:from: > > GLMMorphicRenderer>>renderPane: > > GLMPane>>renderGlamorouslyOn: > > GLMMorphicRenderer(GLMRenderer)>>render: > > GLMMorphicPagerRenderer(GLMMorphicWidgetRenderer)>>renderObject: > > GLMMorphicPagerRenderer>>actOnPaneReplaced: > > MessageSend>>value: > > MessageSend>>cull: > > MessageSend>>cull:cull: > > [ action cull: anAnnouncement cull: announcer ] in > AnnouncementSubscription>>deliver: > > BlockClosure>>on:do: > > [ Processor terminateActive ] in on: exception fork: handlerAction > > "Activate the receiver. In case of exception, fork a new process, > which will handle an error. > > An original process will continue running as if receiver > evaluation finished and answered nil, > > i.e., an expression like: > > > > [ self error: 'some error'] on: Error fork: [:ex | 123 ] > > > > will always answer nil for original process, not 123. > > > > The context stack , starting from context which sent this message > to receiver and > > up to the top of the stack will be transferred to forked process, > with handlerAction on top. > > (so when the forked process will be resuming, it will enter the > handlerAction) > > " > > > > ^ self > > on: exception > > do: [ :ex | > > | copy onDoCtx process handler bottom thisCtx | > > onDoCtx := thisContext. > > thisCtx := onDoCtx home. "find the context > on stack for which this method's is sender" > > [ onDoCtx sender == thisCtx ] > > whileFalse: [ > > onDoCtx := onDoCtx sender. > > onDoCtx > > ifNil: [ > > "Can't find our > home context. seems like we're already forked > > and handling another exception in new > thread. In this case, just pass it through handler." > > ^ handlerAction > cull: ex ] ]. > > bottom := [ Processor terminateActive ] asContext. > > onDoCtx privSender: bottom. > > handler := [ handlerAction cull: ex ] asContext. > > handler privSender: thisContext sender. > > (Process forContext: handler priority: Processor > activePriority) resume. "cut the stack of current process" > > thisContext privSender: thisCtx. > > nil ] in BlockClosure>>on:fork: > > > >> On 07 Jan 2015, at 14:15, Andrei Chis <[email protected]> > wrote: > >> > >> Hi, > >> > >> There is one extra package that you need to load from the GToolkit > repository: GT-InspectorExtensions-CoreRoassal > >> It contains all the inspector extensions that depend on roassal and > thus cannot be integrated into Pharo. > >> > >> > >> Cheers, > >> Andrei > >> > >> On Wed, Jan 7, 2015 at 1:35 PM, Sven Van Caekenberghe <[email protected]> > wrote: > >> Hi, > >> > >> I just loaded Roassal2 in Pharo4 using the following expression: > >> > >> Gofer it > >> smalltalkhubUser: 'ObjectProfile' project: 'Roassal2'; > >> configurationOf: 'Roassal2'; > >> loadStable. > >> > >> When I try one of the examples I see that I am missing some GT > presentations specific to Roassal. How should I load those ? > >> > >> <Screen Shot 2015-01-07 at 13.34.11.png> > >> > >> Thx, > >> > >> Sven > >> > >> > >> > >> > > > > > > >
