Fix a problem when opam files are in sub-directories
This commit is contained in:
parent
b80b3c20ce
commit
27e44cd72b
|
@ -150,7 +150,7 @@ let load () =
|
||||||
match Filename.split_ext fn with
|
match Filename.split_ext fn with
|
||||||
| Some (pkg, ".opam") ->
|
| Some (pkg, ".opam") ->
|
||||||
let version_from_opam_file =
|
let version_from_opam_file =
|
||||||
let lines = lines_of_file fn in
|
let lines = lines_of_file (Path.relative path fn |> Path.to_string) in
|
||||||
List.find_map lines ~f:(fun s ->
|
List.find_map lines ~f:(fun s ->
|
||||||
try
|
try
|
||||||
Scanf.sscanf s "version: %S" (fun x -> Some x)
|
Scanf.sscanf s "version: %S" (fun x -> Some x)
|
||||||
|
|
Loading…
Reference in New Issue