diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2010-02-28 15:46:41 -0500 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2010-02-28 15:46:41 -0500 |
| commit | ddc694f14352fa69557be02913fe9c3daeec13b0 (patch) | |
| tree | 4aeca801868850579ec9ac59cefcf4a5ed6bf25f /tests/ctextbox.ur | |
| parent | 703c91af7525838dff97f88245bf7482745e771e (diff) | |
Fix parsing of space-free .urp directives; use 'class' for 'c*' tags
Diffstat (limited to 'tests/ctextbox.ur')
| -rw-r--r-- | tests/ctextbox.ur | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/tests/ctextbox.ur b/tests/ctextbox.ur index c2a322e3..38c6c577 100644 --- a/tests/ctextbox.ur +++ b/tests/ctextbox.ur @@ -1,7 +1,15 @@ +style foo + fun main () : transaction page = s <- source "Initial"; - return <xml><body> - <ctextbox source={s} size=5/> + 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> + <dyn signal={s <- signal s; return (cdata s)}/> + </body> + </xml> |