# HG changeset patch # User Richard M. Stallman # Date 865062973 0 # Node ID bcdf720abb1a69227ed917355d4028b435cbd8b0 # Parent a99f3bd58831193402e485f99eb5a376eb34e61b (cpp-highlight-buffer): Make sure buffer-invisibility-spec contains `cpp'. (cpp-make-overlay-hidden): Use `cpp' as an invisible property. diff -r a99f3bd58831 -r bcdf720abb1a lisp/progmodes/cpp.el --- a/lisp/progmodes/cpp.el Sat May 31 07:13:34 1997 +0000 +++ b/lisp/progmodes/cpp.el Sat May 31 07:16:13 1997 +0000 @@ -168,6 +168,8 @@ what kind of highlighting to use, and the criteria for highlighting. A prefix arg suppresses display of that buffer." (interactive "P") + (unless (memq 'cpp buffer-invisibility-spec) + (add-to-invisibility-spec 'cpp)) (setq cpp-parse-symbols nil) (cpp-parse-reset) (if (null cpp-edit-list) @@ -332,7 +334,7 @@ (defun cpp-make-overlay-hidden (overlay) ;; Make overlay hidden and intangible. - (overlay-put overlay 'invisible t) + (overlay-put overlay 'invisible 'cpp) (overlay-put overlay 'intangible t) ;; Unfortunately `intangible' is not implemented for overlays yet, ;; so we make is read-only instead.