Mercurial > urweb

comparison tests/html5_forms.ur @ 2077:3cd2bd4b1de0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
More simple textual HTML5 input types
author Adam Chlipala <adam@chlipala.net>
date Sun, 16 Nov 2014 14:16:11 -0500
parents 855d7746a084
children 6d126af2e1cb
comparison
equal deleted inserted replaced
2076:855d7746a084 2077:3cd2bd4b1de0
1 fun handler r = return <xml><body> 1 fun handler r = return <xml><body>
2 A: {[r.A]}<br/> 2 A: {[r.A]}<br/>
3 B: {[r.B]}<br/> 3 B: {[r.B]}<br/>
4 C: {[r.C]}<br/> 4 C: {[r.C]}<br/>
5 D: {[r.D]}<br/>
6 E: {[r.E]}<br/>
7 F: {[r.F]}<br/>
8 G: {[r.G]}<br/>
5 </body></xml> 9 </body></xml>
6 10
7 fun main () = 11 fun main () =
8 return <xml><body> 12 return <xml><body>
9 <form> 13 <form>
10 <textbox{#A} required placeholder="bobby"/> 14 <textbox{#A} required placeholder="bobby"/>
11 <textbox{#B} placeholder="soggy" autofocus/> 15 <textbox{#B} placeholder="soggy" autofocus/>
12 <checkbox{#C}/> 16 <checkbox{#C}/>
17 <email{#D}/>
18 <url{#E}/>
19 <tel{#F}/>
20 <search{#G}/>
13 21
14 <submit action={handler}/> 22 <submit action={handler}/>
15 </form> 23 </form>
16 </body></xml> 24 </body></xml>