# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1007164704 0
# Node ID c2b7b74ef9735030cd862b4d040d33a7f08973b1
# Parent  efb6bac9ee70aea197bf64fb28912eeba8d70c1b
(hide-ifdef-mode): Only modify
`change-major-mode-hook' locally.  Reset invisibility spec.

diff -r efb6bac9ee70 -r c2b7b74ef973 lisp/progmodes/hideif.el
--- a/lisp/progmodes/hideif.el	Fri Nov 30 23:54:45 2001 +0000
+++ b/lisp/progmodes/hideif.el	Fri Nov 30 23:58:24 2001 +0000
@@ -207,7 +207,8 @@
 	     (default-value 'hide-ifdef-hiding))
 	(set (make-local-variable 'hif-outside-read-only) buffer-read-only)
 	(set (make-local-variable 'line-move-ignore-invisible) t)
-	(add-hook 'change-major-mode-hook (lambda () (hide-ifdef-mode -1)))
+	(add-hook 'change-major-mode-hook
+		  (lambda () (hide-ifdef-mode -1)) nil t)
 
 	(add-to-invisibility-spec '(hide-ifdef . t))
 
@@ -216,6 +217,7 @@
 	  (show-ifdefs)))
     ;; else end hide-ifdef-mode
     (kill-local-variable 'line-move-ignore-invisible)
+    (remove-from-invisibility-spec '(hide-ifdef . t))
     (if hide-ifdef-hiding
 	(show-ifdefs))))