diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2014-08-01 11:43:44 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2014-08-01 11:43:44 -0400 |
| commit | 8ef3bce7ec88bb0c73a5885bca9f27526a1eae8b (patch) | |
| tree | d48bf4300318cd966cab3547488c477feaf40119 /lib/ur/basis.urs | |
| parent | 3154131cddb8bc8fe76b86bd9f4902f1d531bce6 (diff) | |
'aria-*' attributes
Diffstat (limited to 'lib/ur/basis.urs')
| -rw-r--r-- | lib/ur/basis.urs | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs index ce8ed91f..8efed25b 100644 --- a/lib/ur/basis.urs +++ b/lib/ur/basis.urs @@ -797,9 +797,13 @@ val active : unit val script : unit -> tag [Code = transaction unit] head [] [] [] -(* Type for HTML5 "data-*" attributes. *) +(* Type for HTML5 "data-*" and "aria-*" attributes. *) +type data_attr_kind +val data_kind : data_attr_kind +val aria_kind : data_attr_kind + type data_attr -val data_attr : string (* Key *) -> string (* Value *) -> data_attr +val data_attr : data_attr_kind -> string (* Key *) -> string (* Value *) -> data_attr (* This function will fail if the key doesn't meet HTML's lexical rules! *) val data_attrs : data_attr -> data_attr -> data_attr |