/[emacs]/emacs/lisp/progmodes/hideif.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/hideif.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.43 by monnier, Wed Nov 28 20:55:38 2001 UTC revision 1.44 by monnier, Fri Nov 30 23:58:24 2001 UTC
# Line 207  how the hiding is done: Line 207  how the hiding is done:
207               (default-value 'hide-ifdef-hiding))               (default-value 'hide-ifdef-hiding))
208          (set (make-local-variable 'hif-outside-read-only) buffer-read-only)          (set (make-local-variable 'hif-outside-read-only) buffer-read-only)
209          (set (make-local-variable 'line-move-ignore-invisible) t)          (set (make-local-variable 'line-move-ignore-invisible) t)
210          (add-hook 'change-major-mode-hook (lambda () (hide-ifdef-mode -1)))          (add-hook 'change-major-mode-hook
211                      (lambda () (hide-ifdef-mode -1)) nil t)
212    
213          (add-to-invisibility-spec '(hide-ifdef . t))          (add-to-invisibility-spec '(hide-ifdef . t))
214    
# Line 216  how the hiding is done: Line 217  how the hiding is done:
217            (show-ifdefs)))            (show-ifdefs)))
218      ;; else end hide-ifdef-mode      ;; else end hide-ifdef-mode
219      (kill-local-variable 'line-move-ignore-invisible)      (kill-local-variable 'line-move-ignore-invisible)
220        (remove-from-invisibility-spec '(hide-ifdef . t))
221      (if hide-ifdef-hiding      (if hide-ifdef-hiding
222          (show-ifdefs))))          (show-ifdefs))))
223        

Legend:
Removed from v.1.43  
changed lines
  Added in v.1.44

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26