WebTabs error?

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

WebTabs error?

Rob Rothwell
The following component displays properly:

tabComponent
    | e |
    e := WebElement new.
    e add: (WebTabs new
            selected: 2;
            addLinkTo: self observee myParent
            text: 'Tab1';
            addText: 'Tab2' attributes: #bold;
            addLinkTo: self observee myParent anotherObject
                text: 'Tab3').
    ^ e

But this one does not; I just get a bulleted list with "Tab3":

tabComponent
    | e |
    e := WebElement new.
    e add: (WebTabs new
            selected: 3;
            addLinkTo: self observee myParent
                text: 'Tab1';
            addLinkTo: self observee myParent anotherObject
                text: 'Tab2';
            addText: 'Tab3' attributes: #bold).
    ^ e

UNLESS I add another linked tab AFTER the third tab:

tabComponent
    | e |
    e := WebElement new.
    e add: (WebTabs new
            selected: 3;
            addLinkTo: self observee myParent
                text: 'Tab1';
            addLinkTo: self observee myParent anotherObject
                text: 'Tab2';
            addText: 'Tab3' attributes: #bold;
            addLinkTo: self observee myParent
                text: 'Tab4').
    ^ e


Is this the expected behavior, or am I doing something wrong?

Rob

_______________________________________________
Aida mailing list
[hidden email]
http://lists.aidaweb.si/mailman/listinfo/aida
Reply | Threaded
Open this post in threaded view
|

Re: WebTabs error?

Janko Mivšek
Rob, to be completely sure what you actually add to the e, end the
message cascade with #yourself:

  e add: (WebTabs new
            selected: 2;
            addLinkTo: self observee myParent
              text: 'Tab1';
          yourself)


Janko


Rob Rothwell wrote:

> The following component displays properly:
>
> tabComponent
>     | e |
>     e := WebElement new.
>     e add: (WebTabs new
>             selected: 2;
>             addLinkTo: self observee myParent
>             text: 'Tab1';
>             addText: 'Tab2' attributes: #bold;
>             addLinkTo: self observee myParent anotherObject
>                 text: 'Tab3').
>     ^ e
>
> But this one does not; I just get a bulleted list with "Tab3":
>
> tabComponent
>     | e |
>     e := WebElement new.
>     e add: (WebTabs new
>             selected: 3;
>             addLinkTo: self observee myParent
>                 text: 'Tab1';
>             addLinkTo: self observee myParent anotherObject
>                 text: 'Tab2';
>             addText: 'Tab3' attributes: #bold).
>     ^ e
>
> UNLESS I add another linked tab AFTER the third tab:
>
> tabComponent
>     | e |
>     e := WebElement new.
>     e add: (WebTabs new
>             selected: 3;
>             addLinkTo: self observee myParent
>                 text: 'Tab1';
>             addLinkTo: self observee myParent anotherObject
>                 text: 'Tab2';
>             addText: 'Tab3' attributes: #bold;
>             addLinkTo: self observee myParent
>                 text: 'Tab4').
>     ^ e
>
>
> Is this the expected behavior, or am I doing something wrong?
>
> Rob
>
>
> ------------------------------------------------------------------------
>
> _______________________________________________
> Aida mailing list
> [hidden email]
> http://lists.aidaweb.si/mailman/listinfo/aida

--
Janko Mivšek
AIDA/Web
Smalltalk Web Application Server
http://www.aidaweb.si
_______________________________________________
Aida mailing list
[hidden email]
http://lists.aidaweb.si/mailman/listinfo/aida
Reply | Threaded
Open this post in threaded view
|

Re: WebTabs error?

Rob Rothwell
Thanks...our messages are crossing paths now...

Boy do I have a lot to learn!

Rob

On Thu, Mar 13, 2008 at 9:06 PM, Janko Mivšek <[hidden email]> wrote:
Rob, to be completely sure what you actually add to the e, end the
message cascade with #yourself:

 e add: (WebTabs new
           selected: 2;
           addLinkTo: self observee myParent
             text: 'Tab1';
         yourself)


Janko


_______________________________________________
Aida mailing list
[hidden email]
http://lists.aidaweb.si/mailman/listinfo/aida