diff --git a/src/document/generator.ml b/src/document/generator.ml index 84983cd4f7..df67f386b7 100644 --- a/src/document/generator.ml +++ b/src/document/generator.ml @@ -615,7 +615,9 @@ module Make (Syntax : SYNTAX) = struct | Error e -> failwith (Url.Error.to_string e) | Ok url -> let anchor = Some url in - let attrs = [ "def"; Url.Anchor.string_of_kind url.kind ] in + let attrs = + [ "def"; "variant"; Url.Anchor.string_of_kind url.kind ] + in let code = O.documentedSrc (O.txt "| ") @ constructor id t.args t.res in diff --git a/test/generators/html/Labels.html b/test/generators/html/Labels.html index f01fe5dffe..ee1fc3d2c4 100644 --- a/test/generators/html/Labels.html +++ b/test/generators/html/Labels.html @@ -118,7 +118,7 @@
| X
diff --git a/test/generators/html/Ocamlary-ExtMod.html b/test/generators/html/Ocamlary-ExtMod.html
index cbaaaff393..329c03d8b2 100644
--- a/test/generators/html/Ocamlary-ExtMod.html
+++ b/test/generators/html/Ocamlary-ExtMod.html
@@ -32,7 +32,7 @@ Ocamlary.ExtMod
|
Leisureforce
diff --git a/test/generators/html/Ocamlary-module-type-TypeExt.html b/test/generators/html/Ocamlary-module-type-TypeExt.html
index d9d810d0b1..983aaa3415 100644
--- a/test/generators/html/Ocamlary-module-type-TypeExt.html
+++ b/test/generators/html/Ocamlary-module-type-TypeExt.html
@@ -31,7 +31,7 @@ Module type Ocamlary.TypeExt
| C
diff --git a/test/generators/html/Ocamlary-module-type-TypeExtPruned.html b/test/generators/html/Ocamlary-module-type-TypeExtPruned.html
index f221161313..39f785509d 100644
--- a/test/generators/html/Ocamlary-module-type-TypeExtPruned.html
+++ b/test/generators/html/Ocamlary-module-type-TypeExtPruned.html
@@ -24,7 +24,7 @@ Ocamlary.TypeExtPruned
| C
diff --git a/test/generators/html/Ocamlary.html b/test/generators/html/Ocamlary.html
index fabbacbb40..4d24b672fd 100644
--- a/test/generators/html/Ocamlary.html
+++ b/test/generators/html/Ocamlary.html
@@ -1797,7 +1797,7 @@ | ExtA
@@ -1813,7 +1813,7 @@ | ExtB
@@ -1829,7 +1829,7 @@ |
ExtC
@@ -1837,7 +1837,7 @@
|
ExtD
@@ -1856,7 +1856,7 @@
| ExtE
@@ -1872,7 +1872,7 @@ | ExtF
@@ -1898,7 +1898,7 @@ |
Foo
@@ -1906,7 +1906,7 @@
|
Bar
@@ -1930,7 +1930,7 @@
|
Quux
@@ -1966,7 +1966,7 @@