changeset 2076:855d7746a084

Remove 'value' attribute of <checkbox>
author Adam Chlipala <adam@chlipala.net>
date Sun, 16 Nov 2014 14:06:24 -0500 (2014-11-16)
parents fde864eacd47
children 3cd2bd4b1de0
files lib/ur/basis.urs tests/html5_forms.ur
diffstat 2 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lib/ur/basis.urs	Sun Nov 16 14:02:17 2014 -0500
+++ b/lib/ur/basis.urs	Sun Nov 16 14:06:24 2014 -0500
@@ -960,7 +960,7 @@
 val textarea : formTag string [] ([Rows = int, Cols = int, Onchange = transaction unit,
                                    Ontext = transaction unit] ++ boxAttrs ++ inputAttrs)
 
-val checkbox : formTag bool [] ([Checked = bool, Onchange = transaction unit, Value = string] ++ boxAttrs)
+val checkbox : formTag bool [] ([Checked = bool, Onchange = transaction unit] ++ boxAttrs)
 
 type file
 val fileName : file -> option string
--- a/tests/html5_forms.ur	Sun Nov 16 14:02:17 2014 -0500
+++ b/tests/html5_forms.ur	Sun Nov 16 14:06:24 2014 -0500
@@ -1,4 +1,7 @@
 fun handler r = return <xml><body>
+  A: {[r.A]}<br/>
+  B: {[r.B]}<br/>
+  C: {[r.C]}<br/>
 </body></xml>
 
 fun main () =
@@ -6,6 +9,7 @@
       <form>
         <textbox{#A} required placeholder="bobby"/>
         <textbox{#B} placeholder="soggy" autofocus/>
+        <checkbox{#C}/>
 
         <submit action={handler}/>
       </form>