diff options
| author | herbelin | 2002-05-27 08:02:11 +0000 |
|---|---|---|
| committer | herbelin | 2002-05-27 08:02:11 +0000 |
| commit | f6aa950ef1d5a0ff0d649e3730ce9965c4ba03b0 (patch) | |
| tree | e5149c4ccd1ed1f054e69c1f85d73f5e7a38dfbc /lib/system.ml | |
| parent | a68c56c67510dc27a6601099f526b1b14190a15b (diff) | |
Changement Filename.is_relative en Filename.is_implicit, plus pertinent
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2710 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/system.ml')
| -rw-r--r-- | lib/system.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/system.ml b/lib/system.ml index 20f5f0ced2..8cb4b8b161 100644 --- a/lib/system.ml +++ b/lib/system.ml @@ -78,7 +78,7 @@ let where_in_path = search_in_path let find_file_in_path paths name = let globname = glob name in - if not (Filename.is_relative globname) then + if not (Filename.is_implicit globname) then let root = Filename.dirname globname in root, globname else |