diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-01-11 10:05:06 -0500 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-01-11 10:05:06 -0500 |
commit | 40a04276005343f3dbc7d963a425e382a4e20701 (patch) | |
tree | ebe069f042def365bd9c7cd68522d305e82f7eb7 /tests/rform.ur | |
parent | 9608c763d7b2923c11e8abd29e28271ae470a5fe (diff) |
Hooking a source into an input
Diffstat (limited to 'tests/rform.ur')
-rw-r--r-- | tests/rform.ur | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/rform.ur b/tests/rform.ur new file mode 100644 index 00000000..17e9a0cf --- /dev/null +++ b/tests/rform.ur @@ -0,0 +1,10 @@ +fun main () : transaction page = + s <- source "Hi"; + return <xml><body> + <form> + <textbox{#A} source={s}/> + </form> + <a onclick={set s "NEW AND DIFFERENT"}>Change it up!</a><br/> + <br/> + Latest: <dyn signal={s <- signal s; return (cdata s)}/> + </body></xml> |