summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-04-30 14:48:23 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-04-30 14:48:23 -0400
commit5b81f4d3c43a84e84355cbbc84aa6c8e9f3f5044 (patch)
tree1d0c5addd790f3060e6c49aa54e931f2791a3bb7 /tests
parent28977d57ddbf4bc42139154f30b5e96a49e46894 (diff)
<input type='hidden'>
Diffstat (limited to 'tests')
-rw-r--r--tests/subforms.ur4
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/subforms.ur b/tests/subforms.ur
index cf5d0ba4..f6876bd8 100644
--- a/tests/subforms.ur
+++ b/tests/subforms.ur
@@ -1,7 +1,7 @@
fun handler' ls =
case ls of
Nil => <xml/>
- | Cons (r, ls) => <xml><li>{[r.A]}, {[r.B]}, {[r.Sub]}</li>{handler' ls}</xml>
+ | Cons (r, ls) => <xml><li>{[r.Nam]}, {[r.A]}, {[r.B]}, {[r.Sub]}</li>{handler' ls}</xml>
fun handler r = return <xml><body>
{[r.A]}<br/>
@@ -14,12 +14,14 @@ fun main () = return <xml><body>
<textbox{#A}/><br/>
<subforms{#Sub}>
<entry>
+ <hidden{#Nam} value="Sparky"/>
<textbox{#A}/><br/>
<textbox{#B}/><br/>
<textbox{#Sub}/><br/>
</entry>
<entry>
+ <hidden{#Nam} value="Snarky"/>
<textbox{#A}/><br/>
<textbox{#B}/><br/>
<textbox{#Sub}/><br/>