matthieu
/
dune
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Rename to_html to setup_html 

Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
Rudi Grinberg 2018-06-07 12:47:50 +07:00
parent acac3e29b3
commit 8740554ebf
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/odoc.ml
View File

@ -161,7 +161,7 @@ module Gen (S : sig val sctx : SC.t end) = struct
Arg_spec.S (List.concat_map (Path.Set.to_list paths)
~f:(fun dir -> [Arg_spec.A "-I"; Path dir])))
let to_html (odoc_file : odoc) ~deps ~requires =
let setup_html (odoc_file : odoc) ~deps ~requires =
let to_remove, jbuilder_keep =
match odoc_file.typ with
| Mld -> odoc_file.html_file, []
@ -329,7 +329,7 @@ module Gen (S : sig val sctx : SC.t end) = struct
let html_files =
let closure = Lib.closure libs in
let deps = Dep.deps closure in
List.map odocs ~f:(to_html ~deps ~requires:closure) in
List.map odocs ~f:(setup_html ~deps ~requires:closure) in
List.iter (
Dep.html_alias (Pkg pkg)
:: List.map ~f:(fun lib -> Dep.html_alias (Lib lib)) libs