diff options
Diffstat (limited to 'lib/envars.ml')
| -rw-r--r-- | lib/envars.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/envars.ml b/lib/envars.ml index 1cb140b94..315d28ceb 100644 --- a/lib/envars.ml +++ b/lib/envars.ml @@ -156,16 +156,16 @@ let coqpath = let exe s = s ^ Coq_config.exec_extension -let guess_ocamlfind () = fst (which (user_path ()) (exe "ocamlfind")) +let guess_ocamlfind () = which (user_path ()) (exe "ocamlfind") let ocamlfind () = if !Flags.ocamlfind_spec then !Flags.ocamlfind else if !Flags.boot then Coq_config.ocamlfind else - try guess_ocamlfind () with Not_found -> Coq_config.ocamlfind + try guess_ocamlfind () / "ocamlfind" with Not_found -> Coq_config.ocamlfind (** {2 Camlp4 paths} *) -let guess_camlp4bin () = snd (which (user_path ()) (exe Coq_config.camlp4)) +let guess_camlp4bin () = which (user_path ()) (exe Coq_config.camlp4) let camlp4bin () = if !Flags.camlp4bin_spec then !Flags.camlp4bin else |