Arc Forumnew | comments | leaders | submitlogin
2 points by colin 5911 days ago | link | parent

This is tcl under Wub.

  Coco init said {r {
    set r [yield [Http Ok+ [yield] [<form> said "[<text> stuff][<submit> ok]"]]]
    Query qvars [Query parse $r] stuff
    return [Http Ok+ [yield [Http Ok+ $r [<a> href . "click here"]]] ["You said: $stuff"]]
  }}