summaryrefslogtreecommitdiff
path: root/demo/increment.ur
diff options
context:
space:
mode:
Diffstat (limited to 'demo/increment.ur')
-rw-r--r--demo/increment.ur6
1 files changed, 1 insertions, 5 deletions
diff --git a/demo/increment.ur b/demo/increment.ur
index 36b8191f..a74e80df 100644
--- a/demo/increment.ur
+++ b/demo/increment.ur
@@ -2,13 +2,9 @@ sequence seq
fun increment () = nextval seq
-fun action () =
+fun main () =
src <- source 0;
return <xml><body>
<dyn signal={n <- signal src; return <xml>{[n]}</xml>}/>
<button value="Update" onclick={n <- increment (); set src n}/>
</body></xml>
-
-fun main () = return <xml><body>
- <form><submit value="Begin demo" action={action}/></form>
-</body></xml>