aboutsummaryrefslogtreecommitdiffhomepage
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2016-12-31 15:54:06 -0500
committerGravatar Adam Chlipala <adam@chlipala.net>2016-12-31 15:54:06 -0500
commit923cc0fcad46eae0a00f7d5c8ea39e627b1aaa57 (patch)
treeb1cc7a27167772b2c601b4bac8b740ea152369b5 /tests
parent10c0bc3c889568717ce97b6d3bda000b3fd46227 (diff)
Use 'id' attribute for <form>
Diffstat (limited to 'tests')
-rw-r--r--tests/formid.ur9
-rw-r--r--tests/formid.urs1
2 files changed, 10 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>
diff --git a/tests/formid.urs b/tests/formid.urs
new file mode 100644
index 00000000..6ac44e0b
--- /dev/null
+++ b/tests/formid.urs
@@ -0,0 +1 @@
+val main : unit -> transaction page