Hi Tomas,

> I would like to add a link ^ which would do the same thing as
> +BubbleField button:

Probably I would use the '<this>' function.

Does the following script something close?

################################################################
#!bin/picolisp lib.l

(load "ext.l" "lib/http.l" "lib/xhtml.l")

(de start ()
   (when (app)
      (setq
         *List '("A" "B" "C" "D" "E")
         *Bubble 0 ) )
   (when (nth *List *Bubble)
      (xchg @ (cdr @)) )
   (html 0 "Bubble" "lib.css" NIL
      (<ul> NIL
         (<li> NIL
            (ht:Prin (car *List)) )
         (for (I . Sym) (cdr *List)
            (<li> NIL
               Sym
               (<nbsp>)
               (<this> '*Bubble I "\^") ) ) ) ) )

(server 8080 "@start")
################################################################

For simplicity, I'm using "A", "B", "C" etc. instead of objects.

'<this>' reloads the current page, passing a value (here 'I') to a given
variable (here '*Bubble').

Cheers,
- Alex
-- 
UNSUBSCRIBE: mailto:[EMAIL PROTECTED]

Reply via email to