Fix path of install files

2017-02-23 16:55:42 +00:00 · 2017-02-23 16:55:42 +00:00 · a257da3f94
parent f2e1f7d2ce
commit a257da3f94
1 changed files with 3 additions and 1 deletions
--- a/src/gen_rules.ml
+++ b/src/gen_rules.ml
@ -1587,7 +1587,9 @@ module Gen(P : Params) = struct
      else
        entries
    in
-    let fn = Path.relative ctx.build_dir (package ^ ".install") in
+    let fn =
+      Path.relative (Path.append ctx.build_dir package_path) (package ^ ".install")
+    in
    add_rule
      (Build.path_set (Install.files entries) >>>
       Build.create_file ~target:fn (fun () ->