[Seaside] Home Link

[Zulq Alam]

Sure I have.

Zulq Alam wrote:
>
> I've attached the full stack trace from the call to #renderContentOn 
> of the Task.

-------------- next part --------------
# PFView(Object)>>doesNotUnderstand: #owner

    self	a PFView
    temps
    aMessage	owner
    inst vars
    decoration	a WAStateHolder(a PFView)
    root	a PFView

# PFView(WAComponent)>>removeDecoration:

    self	a PFView
    temps
    aDecoration	a WADelegation
    dec	a PFView
    inst vars
    decoration	a WAStateHolder(a PFView)
    root	a PFView

# WADelegation(WADecoration)>>remove

    self	a WADelegation
    temps
    inst vars
    next	a WAStateHolder(a PFView)
    delegate	a PFLogInTask

# [] in PFView(WAComponent)>>show:onAnswer: {[:v | delegation remove. event remove. aBlock value: v]}

    self	a PFView
    temps
    aComponent	a PFLogInTask
    aBlock	an AnswerContinuation
    delegation	a WADelegation
    event	a WAAnswerHandler
    v	a PFLogInTask
    inst vars
    decoration	a WAStateHolder(a PFView)
    root	a PFView

# WAAnswerHandler>>handleAnswer:continueWith:

    self	a WAAnswerHandler
    temps
    anObject	a PFLogInTask
    aBlock	[] in WAAnswerHandler(WADecoration)>>handleAnswer: {[^ false]}
    inst vars
    next	a WAStateHolder(a PFLogInTask)
    event	nil
    block	[] in PFView(WAComponent)>>show:onAnswer: {[:v | delegation remove. event remove. aBlock value: v...etc...

# WAAnswerHandler(WADecoration)>>handleAnswer:

    self	a WAAnswerHandler
    temps
    anObject	a PFLogInTask
    inst vars
    next	a WAStateHolder(a PFLogInTask)
    event	nil
    block	[] in PFView(WAComponent)>>show:onAnswer: {[:v | delegation remove. event remove. aBlock value: v...etc...

# [] in PFLogInTask(WAComponent)>>answer: {[:ea | ea handleAnswer: anObject]}

    self	a PFLogInTask
    temps
    anObject	a PFLogInTask
    ea	a WAAnswerHandler
    inst vars
    decoration	a WAStateHolder(a WAAnswerHandler)
    root	a PFView
    logInView	a PFLogInView

# PFLogInTask(WAComponent)>>decorationChainDo:

    self	a PFLogInTask
    temps
    aBlock	[] in PFLogInTask(WAComponent)>>answer: {[:ea | ea handleAnswer: anObject]}
    inst vars
    decoration	a WAStateHolder(a WAAnswerHandler)
    root	a PFView
    logInView	a PFLogInView

# PFLogInTask(WAComponent)>>answer:

    self	a PFLogInTask
    temps
    anObject	a PFLogInTask
    ea	a WAAnswerHandler
    inst vars
    decoration	a WAStateHolder(a WAAnswerHandler)
    root	a PFView
    logInView	a PFLogInView

# [] in PFLogInTask(WATask)>>renderContentOn: {[self answer: self go]}

    self	a PFLogInTask
    temps
    html	a WAHtmlRenderer
    inst vars
    decoration	a WAStateHolder(a WAAnswerHandler)
    root	a PFView
    logInView	a PFLogInView