diff options
| author | Dan Nicolaescu <done@ece.arizona.edu> | 1998-04-08 19:38:37 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <done@ece.arizona.edu> | 1998-04-08 19:38:37 +0000 |
| commit | 8d4d1e65d5200f7d24685d7c4ed3d30ebc92b953 (patch) | |
| tree | 7bab58fbdc94aba0dadb06ab3cde62bc70f23958 /lisp | |
| parent | f35605f3d3eaee2aa6185fd70279763b4bead678 (diff) | |
| download | emacs-8d4d1e65d5200f7d24685d7c4ed3d30ebc92b953.tar.gz emacs-8d4d1e65d5200f7d24685d7c4ed3d30ebc92b953.tar.bz2 emacs-8d4d1e65d5200f7d24685d7c4ed3d30ebc92b953.zip | |
*** empty log message ***
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/textmodes/outline.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/textmodes/outline.el b/lisp/textmodes/outline.el index 1967d3d9649..80e4f5c5d76 100644 --- a/lisp/textmodes/outline.el +++ b/lisp/textmodes/outline.el @@ -411,6 +411,16 @@ If FLAG is nil then text is shown, while if FLAG is t the text is hidden." 'outline-isearch-open-invisible))))) (run-hooks 'outline-view-change-hook)) + +;; Function to be set as an outline-isearch-open-invisible' property +;; to the overlay that makes the outline invisible (see +;; `outline-flag-region'). +(defun outline-isearch-open-invisible (overlay) + (save-excursion + (goto-char (overlay-start overlay)) + (show-entry))) + + ;; Exclude from the region BEG ... END all overlays ;; with a non-nil PROP property. ;; Exclude them by shrinking them to exclude BEG ... END, |