diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2014-11-16 14:02:17 -0500 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2014-11-16 14:02:17 -0500 |
| commit | 53c8e3791551e84d7c2100df885740be5a4871df (patch) | |
| tree | ad2ce8905273af5770bd7217b18c7bb50be994e7 /lib | |
| parent | 19b8f524ebd699a5110d6691f269405ef2182749 (diff) | |
Make 'required' and 'autofocus' attributes Boolean; add a syntax extension for parsing their usual HTML syntax
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ur/basis.urs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs index 170df50c..049d1864 100644 --- a/lib/ur/basis.urs +++ b/lib/ur/basis.urs @@ -949,7 +949,7 @@ con formTag = fn (ty :: Type) (inner :: {Unit}) (attrs :: {Type}) => nm :: Name -> unit -> tag attrs ([Form] ++ ctx) inner [] [nm = ty] -con inputAttrs = [Required = string, Autofocus = string] +con inputAttrs = [Required = bool, Autofocus = bool] val hidden : formTag string [] [Data = data_attr, Id = string, Value = string] |