blob: a9bf7f779f705b51982b81799be4380029e5ebd9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
fun handler r = return <xml><body>
A: {[r.A]}<br/>
B: {[r.B]}<br/>
C: {[r.C]}<br/>
D: {[r.D]}<br/>
E: {[r.E]}<br/>
F: {[r.F]}<br/>
G: {[r.G]}<br/>
</body></xml>
fun main () =
return <xml><body>
<form>
<textbox{#A} required placeholder="bobby"/>
<textbox{#B} placeholder="soggy" autofocus/>
<checkbox{#C}/>
<email{#D}/>
<url{#E}/>
<tel{#F}/>
<search{#G}/>
<submit action={handler}/>
</form>
</body></xml>
|