Mercurial > urweb

comparison tests/html5_forms.ur @ 2078:6d126af2e1cb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Some more HTML5 input types
author Adam Chlipala <adam@chlipala.net>
date Sun, 16 Nov 2014 14:39:38 -0500
parents 3cd2bd4b1de0
children
comparison
equal deleted inserted replaced
2077:3cd2bd4b1de0 2078:6d126af2e1cb
4 C: {[r.C]}<br/> 4 C: {[r.C]}<br/>
5 D: {[r.D]}<br/> 5 D: {[r.D]}<br/>
6 E: {[r.E]}<br/> 6 E: {[r.E]}<br/>
7 F: {[r.F]}<br/> 7 F: {[r.F]}<br/>
8 G: {[r.G]}<br/> 8 G: {[r.G]}<br/>
9 H: {[r.H]}<br/>
10 I: {[r.I]}<br/>
11 J: {[r.J]}<br/>
12 K: {[r.K]}<br/>
13 L: {[r.L]}<br/>
14 M: {[r.M]}<br/>
15 N: {[r.N]}<br/>
16 O: {[r.O]}<br/>
17 P: {[r.P]}<br/>
9 </body></xml> 18 </body></xml>
10 19
11 fun main () = 20 fun main () =
12 return <xml><body> 21 return <xml><body>
13 <form> 22 <form>
17 <email{#D}/> 26 <email{#D}/>
18 <url{#E}/> 27 <url{#E}/>
19 <tel{#F}/> 28 <tel{#F}/>
20 <search{#G}/> 29 <search{#G}/>
21 30
31 <hr/>
32
33 <color{#H}/>
34 <number{#I} min={17.0} max={32.8} value={20.6} step={2.5}/>
35 <range{#J} min={17.0} max={32.8} value={20.6}/>
36 <date{#K}/>
37 <datetime{#L}/>
38 <datetime-local{#M}/>
39 <month{#N}/>
40 <week{#O}/>
41 <timeInput{#P}/>
42
22 <submit action={handler}/> 43 <submit action={handler}/>
23 </form> 44 </form>
24 </body></xml> 45 </body></xml>