@@ -27,9 +27,8 @@ type domRef
27
27
28
28
(*
29
29
This list isn't exhaustive. We'll add more as we go.
30
- 'aria* type variables can be removed once we can rewrite *.ml libs to *res.
31
30
*)
32
- type ('ariaCurrent, 'ariaInvalid, 'ariaHaspopup, 'ariaChecked, 'ariaPressed, 'loading) domProps = {
31
+ type domProps = {
33
32
(* V10 compiler will enable to change label declaration to `key?: string` *)
34
33
key : string
35
34
[@ ns.optional];
@@ -40,17 +39,15 @@ type ('ariaCurrent, 'ariaInvalid, 'ariaHaspopup, 'ariaChecked, 'ariaPressed, 'lo
40
39
(* accessibility *)
41
40
(* https://www.w3.org/TR/wai-aria-1.1/ *)
42
41
(* https://accessibilityresources.org/<aria-tag> is a great resource for these *)
43
- (* ariaCurrent: [`page | `step | `location | `date | `time | `_true | `_false] *)
44
- ariaCurrent : 'ariaCurrent
42
+ ariaCurrent : [`page | `step | `location | `date | `time | `_true | `_false]
45
43
[@ ns.optional] [@ bs.as "aria-current" ];
46
44
ariaDetails : string
47
45
[@ ns.optional] [@ bs.as "aria-details" ];
48
46
ariaDisabled : bool
49
47
[@ ns.optional] [@ bs.as "aria-disabled" ];
50
48
ariaHidden : bool
51
49
[@ ns.optional] [@ bs.as "aria-hidden" ];
52
- (* ariaInvalid: [`grammar | `spelling | `_true | `_false ] *)
53
- ariaInvalid : 'ariaInvalid
50
+ ariaInvalid : [`grammar | `spelling | `_true| `_false]
54
51
[@ ns.optional] [@ bs.as "aria-invalid" ];
55
52
ariaKeyshortcuts : string
56
53
[@ ns.optional] [@ bs.as "aria-keyshortcuts" ];
@@ -61,13 +58,11 @@ type ('ariaCurrent, 'ariaInvalid, 'ariaHaspopup, 'ariaChecked, 'ariaPressed, 'lo
61
58
(* Widget Attributes *)
62
59
ariaAutocomplete : [`inline | `list | `both | `none ]
63
60
[@ ns.optional] [@ bs.as "aria-autocomplete" ];
64
- (* ariaChecked: [`_true | `_false | `mixed] https://www.w3.org/TR/wai-aria-1.1/#valuetype_tristate *)
65
- ariaChecked : 'ariaChecked
61
+ ariaChecked : [`_true | `_false | `mixed ] (* https://www.w3.org/TR/wai-aria-1.1/#valuetype_tristate *)
66
62
[@ ns.optional] [@ bs.as "aria-checked" ];
67
63
ariaExpanded : bool
68
64
[@ ns.optional] [@ bs.as "aria-expanded" ];
69
- (* ariaHaspopup: [`menu | `listbox | `tree | `grid | `dialog | `_true | `_false] *)
70
- ariaHaspopup : 'ariaHaspopup
65
+ ariaHaspopup : [`menu | `listbox | `tree | `grid | `dialog | `_true | `_false]
71
66
[@ ns.optional] [@ bs.as "aria-haspopup" ];
72
67
ariaLevel : int
73
68
[@ ns.optional] [@ bs.as "aria-lavel" ];
@@ -81,8 +76,7 @@ type ('ariaCurrent, 'ariaInvalid, 'ariaHaspopup, 'ariaChecked, 'ariaPressed, 'lo
81
76
[@ ns.optional] [@ bs.as "aria-orientation" ];
82
77
ariaPlaceholder : string
83
78
[@ ns.optional] [@ bs.as "aria-placeholder" ];
84
- (* ariaPressed: [`_true | `_false| `mixed] https://www.w3.org/TR/wai-aria-1.1/#valuetype_tristate *)
85
- ariaPressed : 'ariaPressed
79
+ ariaPressed : [`_true | `_false| `mixed ] (* https://www.w3.org/TR/wai-aria-1.1/#valuetype_tristate *)
86
80
[@ ns.optional] [@ bs.as "aria-pressed" ];
87
81
ariaReadonly : bool
88
82
[@ ns.optional] [@ bs.as "aria-readonly" ];
@@ -281,8 +275,7 @@ type ('ariaCurrent, 'ariaInvalid, 'ariaHaspopup, 'ariaChecked, 'ariaPressed, 'lo
281
275
[@ ns.optional];
282
276
list : string
283
277
[@ ns.optional];
284
- (* loading: [`_lazy | `eager] *)
285
- loading : 'loading
278
+ loading : [`_lazy | `eager ]
286
279
[@ ns.optional];
287
280
loop : bool
288
281
[@ ns.optional];
0 commit comments