summaryrefslogtreecommitdiff
path: root/tests/formid.ur
diff options
context:
space:
mode:
authorGravatar Benjamin Barenblat <bbaren@mit.edu>2017-01-07 08:38:35 -0500
committerGravatar Benjamin Barenblat <bbaren@mit.edu>2017-01-07 08:38:35 -0500
commit6145d9df05f442e29dfa96a0b8e15ffcc2d683dd (patch)
tree447639a278556e40c0f7a5784ba4b645f80c1187 /tests/formid.ur
parent235602373c04aa38b7f8c93e6efbd9276ecc2266 (diff)
parent4bbdbbc72d96567f8c5a1d435beef32d447dec30 (diff)
Merge branch 'upstream' into dfsg_clean20170105+dfsg
Diffstat (limited to 'tests/formid.ur')
-rw-r--r--tests/formid.ur9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/formid.ur b/tests/formid.ur
new file mode 100644
index 00000000..c9e3317d
--- /dev/null
+++ b/tests/formid.ur
@@ -0,0 +1,9 @@
+fun handler () = return <xml></xml>
+
+fun main () : transaction page =
+ id <- fresh;
+ return <xml><body>
+ <form id={id}>
+ <submit action={handler}/>
+ </form>
+ </body></xml>