diff --git a/src/config.ml b/src/config.ml index 2697ee1d..9f01ae9e 100644 --- a/src/config.ml +++ b/src/config.ml @@ -7,6 +7,9 @@ let local_install_dir = let local_install_bin_dir ~context = Path.relative (local_install_dir ~context) "bin" +let local_install_man_dir ~context = + Path.relative (local_install_dir ~context) "bin" + let local_install_lib_dir ~context ~package = Path.relative (Path.relative (local_install_dir ~context) "lib") diff --git a/src/config.mli b/src/config.mli index c7d7f39a..1fb811c3 100644 --- a/src/config.mli +++ b/src/config.mli @@ -6,4 +6,5 @@ open! Import val local_install_dir : context:string -> Path.t val local_install_bin_dir : context:string -> Path.t +val local_install_man_dir : context:string -> Path.t val local_install_lib_dir : context:string -> package:string -> Path.t diff --git a/src/context.ml b/src/context.ml index 18b7db54..d3a81783 100644 --- a/src/context.ml +++ b/src/context.ml @@ -341,6 +341,7 @@ let env_for_exec t = (Config.local_install_dir ~context:t.name) "lib") ; extend_var "PATH" (Config.local_install_bin_dir ~context:t.name) + ; extend_var "MANPATH" (Config.local_install_man_dir ~context:t.name) ] in extend_env ~env:t.env ~vars:(String_map.of_alist_exn vars)