Mercurial > urweb
changeset 2060:cbc8bcf30c99
<cselect> and <coption> type fixes (grandfathered into release)
| author | Adam Chlipala <adam@chlipala.net> |
|---|---|
| date | Tue, 19 Aug 2014 11:17:39 -0400 |
| parents | 44428bbda65c |
| children | e7b9002c2bfc |
| files | lib/ur/basis.urs |
| diffstat | 1 files changed, 2 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/ur/basis.urs Tue Aug 19 11:08:25 2014 -0400 +++ b/lib/ur/basis.urs Tue Aug 19 11:17:39 2014 -0400 @@ -1019,9 +1019,8 @@ 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 -val coption : unit -> tag [Value = string, Selected = bool] cselect [] [] [] +val cselect : cformTag ([Source = source string, Onchange = transaction unit] ++ boxAttrs) [Cselect] +val coption : unit -> tag [Value = string, Selected = bool] [Cselect, Body] [] [] [] val ctextarea : cformTag ([Value = string, Rows = int, Cols = int, Source = source string, Onchange = transaction unit, Ontext = transaction unit] ++ boxAttrs) []