From c1c4dce6754c270ae9b8d504bab98241717fe7ff Mon Sep 17 00:00:00 2001
From: notin <notin@85f007b7-540e-0410-9357-904b9bb8a0f7>
Date: Thu, 27 Jul 2006 15:30:35 +0000
Subject: Correction du bug #1170: les options synchronisées déclarées dans une
 section ne survivent plus à la fin de la section.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

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

(limited to 'library/goptions.ml')

diff --git a/library/goptions.ml b/library/goptions.ml
index 43c4da14a..4eb8f2402 100644
--- a/library/goptions.ml
+++ b/library/goptions.ml
@@ -253,7 +253,7 @@ let declare_option cast uncast
 	       unfreeze_function = write;
 	       init_function = (fun () -> write default);
 	       survive_module = false;
-	       survive_section = true}
+	       survive_section = false}
     in 
     fun v -> add_anonymous_leaf (decl_obj v)
   else write
-- 
cgit v1.2.3