From f6aa950ef1d5a0ff0d649e3730ce9965c4ba03b0 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Mon, 27 May 2002 08:02:11 +0000
Subject: 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
---
 lib/system.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 
-- 
cgit v1.2.3