diff options
Diffstat (limited to 'tests/select.ur')
-rw-r--r-- | tests/select.ur | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/tests/select.ur b/tests/select.ur index d97e6a55..ff3908e9 100644 --- a/tests/select.ur +++ b/tests/select.ur @@ -1,13 +1,13 @@ -val handler = fn x => <html><body> +val handler = fn x => <xml><body> You entered: {cdata x.A} -</body></html> +</body></xml> -val main = fn () => <html><body> - <lform> - <lselect{#A}> - <loption value="A">A</loption> - <loption value="B">B</loption> - </lselect> +val main = fn () => <xml><body> + <form> + <select{#A}> + <option value="A">A</option> + <option value="B">B</option> + </select> <submit action={handler}/> - </lform> -</body></html> + </form> +</body></xml> |