diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-08-07 13:09:26 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-08-07 13:09:26 -0400 |
| commit | 51fd5b1af6b2af7706c0c8604129d99e504a2d36 (patch) | |
| tree | dc6203b3be07a7d45f5f17b9339405eca54deadf /tests | |
| parent | befe86e703563f4f9ce8b8b0e36ae19e84b0ca8b (diff) | |
Checkboxes
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/checkbox.lac | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/checkbox.lac b/tests/checkbox.lac new file mode 100644 index 00000000..6d7ee34c --- /dev/null +++ b/tests/checkbox.lac @@ -0,0 +1,10 @@ +val handler = fn x => <html><body> + {if x.A then cdata "Yes" else cdata "No"} +</body></html> + +val main = fn () => <html><body> + <lform> + <checkbox{#A}/> How about it?<br/> + <submit action={handler}/> + </lform> +</body></html> |