diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-07-24 10:41:53 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-07-24 10:41:53 -0400 |
| commit | a8d4408b6a68c27dc88d8f7e37326c19296808db (patch) | |
| tree | 1a5e9d5f469c8e29d4c0106086d8a029f4dc476b /tests | |
| parent | a729c94d397dc7731a711eea990092c90fbd5460 (diff) | |
textarea
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/textarea.lac | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/textarea.lac b/tests/textarea.lac new file mode 100644 index 00000000..708c9b03 --- /dev/null +++ b/tests/textarea.lac @@ -0,0 +1,10 @@ +val handler = fn x => <html><body> + You entered: {cdata x.A} +</body></html> + +val main = fn () => <html><body> + <lform> + <ltextarea{#A}/> + <submit action={handler}/> + </lform> +</body></html> |