From dccaed2452e544308b46f0c73ffd4f542ef4c8c6 Mon Sep 17 00:00:00 2001
From: Emilio Jesus Gallego Arias
Date: Fri, 26 Oct 2018 10:24:18 +0200
Subject: [libobject] Move object_name next to object definition.

`object_name` is a particular choice of the implementation of
`Liboject`, thus it makes sense to tie it to that particular module.

This may prove useful in the future as we may want to modify object
naming.
---
 library/lib.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'library/lib.ml')

diff --git a/library/lib.ml b/library/lib.ml
index 27c5056a7f..1acc8fd8fd 100644
--- a/library/lib.ml
+++ b/library/lib.ml
@@ -138,7 +138,7 @@ let make_kn id =
   let mp = current_mp () in
   Names.KerName.make mp (Names.Label.of_id id)
 
-let make_oname id = Libnames.make_oname !lib_state.path_prefix id
+let make_oname id = Libobject.make_oname !lib_state.path_prefix id
 
 let recalc_path_prefix () =
   let rec recalc = function
-- 
cgit v1.2.3