diff options
author | 2017-10-03 15:34:46 +0200 | |
---|---|---|
committer | 2017-10-03 15:34:46 +0200 | |
commit | 90c4339a54e392b4564c9851fbd48fe910bb4cab (patch) | |
tree | dd01d9bbc9ed985d048f1e95fedbe11ba19ff5b3 /lib | |
parent | 3a8209d262ef586baee5b76161afd83893d1dad3 (diff) | |
parent | 77d95ecd65a6bbebfcd89193fb3e2c43ebc6469a (diff) |
Merge PR #1100: Avoid looping when searching for CoqProject.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/coqProject_file.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/coqProject_file.ml4 b/lib/coqProject_file.ml4 index 13de731f5..970666638 100644 --- a/lib/coqProject_file.ml4 +++ b/lib/coqProject_file.ml4 @@ -206,7 +206,7 @@ let rec find_project_file ~from ~projfile_name = if Sys.file_exists fname then Some fname else let newdir = Filename.dirname from in - if newdir = "" || newdir = "/" then None + if newdir = from then None else find_project_file ~from:newdir ~projfile_name ;; |