TODO demo


defrec todo(db) {
  <html>
    <form l:action={seq(insert into ("todo", db) values {item=new}, todo(db))} method="POST">
      <input l:name="new" type="text" size="40"/>
      <input type="submit" value="add new item"/>
    </form>
    <table>{
          [<tr><td>{[i.item]}</td>
               <td><form l:action={seq(delete from ("todo", db) values [i], todo(db))} method="POST">
                       <input type="submit" value="done"/>
                    </form>
               </td>
           </tr> | i <- table "todo" with {item:string} order [item:asc] from db]
    }</table>
  </html>
};

todo(database {name="...", host="...", port=..., user="...", pass="..."})