Hi,
my goal is to display Pier environment as Seaside subcomponent.
I have some problem ....
First i create a class:
WAComponent subclass: #TestMultiPier
instanceVariableNames: 'pageA pageB tabs task'
classVariableNames: ''
poolDictionaries: ''
category: 'DTR-TestPier'
the
initialize
super initialize.
tabs := OrderedCollection new.
nomeKernel := 'pier'.
pageA := PRPierFrame on: (PRContext kernel: (PRKernel instanceNamed: nomeKernel )).
self initTopMenuFor
the
initTopMenuFor
tabs add: 'PageA' -> pageA.
the
renderContentOn: html
html text: 'Prova gestione multi Pier istance'.
html paragraph: Time now.
self renderTopMenuOn: html.
task ifNotNil:[ html div id: 'divTabMst';
with:[ html render: task]]
the
renderTopMenuOn: html
html unorderedList id: 'menu'; with: [
tabs do: [ :each |
html listItem: [
html anchor
class: (task = each value
ifTrue: [ 'active' ]);
callback: [ task := each value ];
with: each key ] ] ]
Now when clic on the PageA link the system rendering the Pier page correctly.
The error is erase when i click on sub link ( of the Pier main page ) Information or
Environment.
The system report the error:
UndefinedObject(Object)>>doesNotUnderstand: #context:
PRCurrentContext class>>value:
[] in PRContext>>activationCallback
BlockClosure>>valueWithPossibleArguments:
WAActionCallback>>evaluateWithArgument:
WAActionCallback(WACallback)>>evaluateWithFieldValues:
[] in WACallbackRegistry>>handle:
OrderedCollection>>do:
WACallbackRegistry>>handle:
[] in [] in WAActionPhaseContinuation>>runCallbacks
BlockClosure>>on:do:
WAActionPhaseContinuation(WARenderLoopContinuation)>>withNotificationHandlerDo:
[] in WAActionPhaseContinuation>>runCallbacks
BlockClosure>>ensure:
WAActionPhaseContinuation>>runCallbacks
WAActionPhaseContinuation>>handleRequest
[] in WAActionPhaseContinuation(WASessionContinuation)>>basicValue
BlockClosure>>on:do:
WAActionPhaseContinuation(WASessionContinuation)>>withUnregisteredHandlerDo:
WAActionPhaseContinuation(WASessionContinuation)>>basicValue
Because this ?
Thanks,
Dario