From aa37087b8e7151ea96321a11012c1064210ef4ea Mon Sep 17 00:00:00 2001
From: ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7>
Date: Tue, 18 Dec 2012 17:09:31 +0000
Subject: Modulification of Label

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16097 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 library/libnames.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'library/libnames.ml')

diff --git a/library/libnames.ml b/library/libnames.ml
index 8e026d8c2..7680e5248 100644
--- a/library/libnames.ml
+++ b/library/libnames.ml
@@ -151,7 +151,7 @@ type object_name = full_path * kernel_name
 type object_prefix = Dir_path.t * (module_path * Dir_path.t)
 
 let make_oname (dirpath,(mp,dir)) id =
-  make_path dirpath id, make_kn mp dir (label_of_id id)
+  make_path dirpath id, make_kn mp dir (Label.of_id id)
 
 (* to this type are mapped Dir_path.t's in the nametab *)
 type global_dir_reference =
-- 
cgit v1.2.3