jon.recoil.org
this repo has no description
jtw opam: fix META file relativization for _build/install paths
Use relativize_or_fallback for META files (already used for CMI files),
fixing a None exception when libraries are installed outside the
standard findlib tree.
Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
+1
-4
js_top_worker/bin/jtw.ml
+1
-4
js_top_worker/bin/jtw.ml
···
207
207
Util.StringSet.fold
208
208
(fun meta_file acc ->
209
209
let meta_file = Fpath.v meta_file in
210
-
let d =
211
-
Fpath.relativize ~root:findlib_dir meta_file
212
-
|> Option.get |> Fpath.parent
213
-
in
210
+
let d = relativize_or_fallback ~findlib_dir meta_file |> Fpath.parent in
214
211
(meta_file, d) :: acc)
215
212
meta_files []
216
213
in