Fix environment's parent_page for pages

Signed-off-by: Paul-Elliot <[email protected]>
ocaml · Jul 18, 2023 · 633aa4d · 633aa4d
1 parent 5c158d1
commit 633aa4d
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/xref2/env.ml b/src/xref2/env.ml
@@ -821,6 +821,7 @@ let open_page page env = add_docs page.Lang.Page.content env
 
 let env_of_page page resolver =
   let initial_env = open_page page empty in
+  let initial_env = { initial_env with parent_page = Some page.name } in
   set_resolver initial_env resolver |> open_units resolver
 
 let env_for_reference resolver =