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 | 32aa8589761b58e24715818a7b3af73d69055b27 (patch) | |
tree | d48bf4300318cd966cab3547488c477feaf40119 /lib | |
parent | 619ee0bb2735f0be87484175ab10fbb6579d723b (diff) |
'aria-*' attributes
Diffstat (limited to 'lib')
-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 |