Mercurial > urweb

view tests/showTime.ur @ 2269:f7bc7c11a656

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make SQL caches use more of the pure caching machinery, but it's brittle.
author Ziv Scully <ziv@mit.edu>
date Thu, 15 Oct 2015 00:52:04 -0400
parents 438561303d02
children
line wrap: on
line source
fun main () : transaction page =
    tm <- now;
    s <- source tm;
    return <xml><body>
      <b>Server:</b> {[tm]}<br/>
      <b>Client:</b> <dyn signal={v <- signal s; return (txt v)}/>
      <button value="Recalculate" onclick={tm <- now; set s tm}/>
    </body></xml>