From e7f9bc39ab4e879b521439901ed99bf3382bd40a Mon Sep 17 00:00:00 2001
From: coq
Date: Tue, 7 Oct 2003 15:36:10 +0000
Subject: Correction du bug 335 et Export/Require Export dans un module

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4534 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 dev/objects.el | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'dev')

diff --git a/dev/objects.el b/dev/objects.el
index 46ea2dea0b..b3a2694d2c 100644
--- a/dev/objects.el
+++ b/dev/objects.el
@@ -1,3 +1,15 @@
+(defun add-survive-module nil
+  (interactive)
+  (query-replace-regexp 
+   "
+\\([ 	]*\\)\\(Summary\.\\)?survive_section"
+   "
+\\1\\2survive_module = false;
+\\1\\2survive_section")
+  )
+
+(global-set-key [f2] 'add-survive-module)
+
 ; functions to change old style object declaration to new style
 
 (defun repl-open nil
-- 
cgit v1.2.3