Mercurial > urweb

comparison tests/ctextbox.ur @ 1173:983d9b38abc7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix parsing of space-free .urp directives; use 'class' for 'c*' tags
author Adam Chlipala <adamc@hcoop.net>
date Sun, 28 Feb 2010 15:46:41 -0500
parents 5145181b02fa
children
comparison
equal deleted inserted replaced
1172:ad15700272f6 1173:983d9b38abc7
1 style foo
2
1 fun main () : transaction page = 3 fun main () : transaction page =
2 s <- source "Initial"; 4 s <- source "Initial";
3 return <xml><body> 5 return <xml>
4 <ctextbox source={s} size=5/> 6 <head>
7 <link rel="stylesheet" type="text/css" href="http://localhost/static/style.css"/>
8 </head>
9 <body>
10 <ctextbox source={s} size=5/>
11 <ctextbox class={foo} source={s}/>
5 12
6 <dyn signal={s <- signal s; return (cdata s)}/> 13 <dyn signal={s <- signal s; return (cdata s)}/>
7 </body></xml> 14 </body>
15 </xml>