aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorStefan Monnier2001-11-30 23:58:24 +0000
committerStefan Monnier2001-11-30 23:58:24 +0000
commitf71d927d8b0175b29dc5b79508e7a3360d533618 (patch)
treeecd4b8447ff08a187a910242f776eadca03558ba /lisp
parent00f2404d755861c6997502377c8d84f73833140b (diff)
downloademacs-f71d927d8b0175b29dc5b79508e7a3360d533618.tar.gz
emacs-f71d927d8b0175b29dc5b79508e7a3360d533618.zip
(hide-ifdef-mode): Only modify
`change-major-mode-hook' locally. Reset invisibility spec.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/progmodes/hideif.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/progmodes/hideif.el b/lisp/progmodes/hideif.el
index ab7aad28931..ba12b7cbffd 100644
--- a/lisp/progmodes/hideif.el
+++ b/lisp/progmodes/hideif.el
@@ -207,7 +207,8 @@ how the hiding is done:
207 (default-value 'hide-ifdef-hiding)) 207 (default-value 'hide-ifdef-hiding))
208 (set (make-local-variable 'hif-outside-read-only) buffer-read-only) 208 (set (make-local-variable 'hif-outside-read-only) buffer-read-only)
209 (set (make-local-variable 'line-move-ignore-invisible) t) 209 (set (make-local-variable 'line-move-ignore-invisible) t)
210 (add-hook 'change-major-mode-hook (lambda () (hide-ifdef-mode -1))) 210 (add-hook 'change-major-mode-hook
211 (lambda () (hide-ifdef-mode -1)) nil t)
211 212
212 (add-to-invisibility-spec '(hide-ifdef . t)) 213 (add-to-invisibility-spec '(hide-ifdef . t))
213 214
@@ -216,6 +217,7 @@ how the hiding is done:
216 (show-ifdefs))) 217 (show-ifdefs)))
217 ;; else end hide-ifdef-mode 218 ;; else end hide-ifdef-mode
218 (kill-local-variable 'line-move-ignore-invisible) 219 (kill-local-variable 'line-move-ignore-invisible)
220 (remove-from-invisibility-spec '(hide-ifdef . t))
219 (if hide-ifdef-hiding 221 (if hide-ifdef-hiding
220 (show-ifdefs)))) 222 (show-ifdefs))))
221 223