Mercurial > urweb
diff lib/ur/basis.urs @ 2021:2da693675de9
String.trim; add OnChange to more tags
| author | Adam Chlipala <adam@chlipala.net> |
|---|---|
| date | Tue, 10 Jun 2014 10:58:22 -0400 |
| parents | fee1f660139c |
| children | dfa35ca83d92 |
line wrap: on
line diff
--- a/lib/ur/basis.urs Mon Jun 09 18:26:03 2014 -0400 +++ b/lib/ur/basis.urs Tue Jun 10 10:58:22 2014 -0400 @@ -946,11 +946,11 @@ val hidden : formTag string [] [Data = data_attr, Id = string, Value = string] val textbox : formTag string [] ([Value = string, Size = int, Placeholder = string, Source = source string, Onchange = transaction unit, Ontext = transaction unit] ++ boxAttrs) -val password : formTag string [] ([Value = string, Size = int, Placeholder = string] ++ boxAttrs) +val password : formTag string [] ([Value = string, Size = int, Placeholder = string, Onchange = transaction unit] ++ boxAttrs) val textarea : formTag string [] ([Rows = int, Cols = int, Onchange = transaction unit, Ontext = transaction unit] ++ boxAttrs) -val checkbox : formTag bool [] ([Checked = bool] ++ boxAttrs) +val checkbox : formTag bool [] ([Checked = bool, Onchange = transaction unit] ++ boxAttrs) type file val fileName : file -> option string @@ -1010,7 +1010,7 @@ Ontext = transaction unit] ++ boxAttrs) [] val button : cformTag ([Value = string] ++ boxAttrs) [] -val ccheckbox : cformTag ([Value = bool, Size = int, Source = source bool] ++ boxAttrs) [] +val ccheckbox : cformTag ([Value = bool, Size = int, Source = source bool, Onchange = transaction unit] ++ boxAttrs) [] con cselect = [Cselect] val cselect : cformTag ([Source = source string, Onchange = transaction unit] ++ boxAttrs) cselect