Mercurial > urweb

view tests/ctextbox.ur @ 1748:95dd9f427bb2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix from Edward Yang to generation of 404 errors in FastCGI
author Adam Chlipala <adam@chlipala.net>
date Sun, 06 May 2012 12:37:43 -0400
parents 983d9b38abc7
children
line wrap: on
line source
style foo

fun main () : transaction page =
    s <- source "Initial";
    return <xml>
      <head>
        <link rel="stylesheet" type="text/css" href="http://localhost/static/style.css"/>
      </head>
      <body>
        <ctextbox source={s} size=5/>
        <ctextbox class={foo} source={s}/>

        <dyn signal={s <- signal s; return (cdata s)}/>
      </body>
    </xml>