From a7a27c88f2d670d4b20f7dc13e90f6e10600df61 Mon Sep 17 00:00:00 2001
From: ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7>
Date: Tue, 26 Mar 2013 15:07:11 +0000
Subject: Moved the Loadpath part of Library to its own file, and documented
 the interface.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16372 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 library/states.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'library/states.ml')

diff --git a/library/states.ml b/library/states.ml
index 906ebdacc..9d15dfc6c 100644
--- a/library/states.ml
+++ b/library/states.ml
@@ -28,8 +28,8 @@ let (extern_state,intern_state) =
     raw_extern s (freeze())),
   (fun s ->
     let s = ensure_suffix s in
-    unfreeze
-      (with_magic_number_check (raw_intern (Library.get_load_paths ())) s);
+    let paths = Loadpath.get_paths () in
+    unfreeze (with_magic_number_check (raw_intern paths) s);
     Library.overwrite_library_filenames s)
 
 (* Rollback. *)
-- 
cgit v1.2.3