*** empty log message ***

diff --git a/lisp/textmodes/outline.el b/lisp/textmodes/outline.el
index 1967d3d96495991f62a3cefb41632703682ba980..80e4f5c5d76c53ada4de55850360af454086959a 100644 (file)
--- 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,