[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] Create visibility overlays properly
From: |
Milan Zamazal |
Subject: |
[O] [PATCH] Create visibility overlays properly |
Date: |
Mon, 31 Oct 2011 22:40:28 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.3 (gnu/linux) |
* org.el (org-set-outline-overlay-data): Use outline-flag-region to make a
region invisible. This ensures all necessary actions, especially adding
isearch-open-invisible property, are applied.
---
lisp/org.el | 3 +--
1 files changed, 1 insertions(+), 2 deletions(-)
diff --git a/lisp/org.el b/lisp/org.el
index a75f96e..c4196e8 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -6599,8 +6599,7 @@ DATA should have been made by `org-outline-overlay-data'."
(widen)
(show-all)
(mapc (lambda (c)
- (setq o (make-overlay (car c) (cdr c)))
- (overlay-put o 'invisible 'outline))
+ (outline-flag-region (car c) (cdr c) t))
data)))))
;;; Folding of blocks
--
1.7.2.5