Fix #717
Extensions should be removed from the map of basenames to mld paths
This commit is contained in:
parent
575cbce699
commit
7b17fa013f
|
@ -21,6 +21,8 @@ next
|
||||||
- `-j` now defaults to the number of processing units available rather
|
- `-j` now defaults to the number of processing units available rather
|
||||||
4 (#726, @diml)
|
4 (#726, @diml)
|
||||||
|
|
||||||
|
- Fix attaching index.mld to documentation (#731, fixes #717 @rgrinberg)
|
||||||
|
|
||||||
1.0+beta20 (10/04/2018)
|
1.0+beta20 (10/04/2018)
|
||||||
-----------------------
|
-----------------------
|
||||||
|
|
||||||
|
|
|
@ -433,7 +433,8 @@ module Gen (S : sig val sctx : SC.t end) = struct
|
||||||
|
|
||||||
let check_mlds_no_dupes ~pkg ~mlds =
|
let check_mlds_no_dupes ~pkg ~mlds =
|
||||||
match
|
match
|
||||||
List.map mlds ~f:(fun mld -> (Path.basename mld, mld))
|
List.map mlds ~f:(fun mld ->
|
||||||
|
(Filename.chop_extension (Path.basename mld), mld))
|
||||||
|> String.Map.of_list
|
|> String.Map.of_list
|
||||||
with
|
with
|
||||||
| Ok m -> m
|
| Ok m -> m
|
||||||
|
|
|
@ -1,5 +1 @@
|
||||||
$ jbuilder build @doc
|
$ jbuilder build @doc
|
||||||
Multiple rules generated for _build/default/_doc/_odoc/pkg/hello_world/page-index.odoc:
|
|
||||||
- <internal location>
|
|
||||||
- <internal location>
|
|
||||||
[1]
|
|
||||||
|
|
Loading…
Reference in New Issue