Преглед на файлове

Create visibility overlays properly

* 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.
Milan Zamazal преди 13 години
родител
ревизия
a5ed98e452
променени са 1 файла, в които са добавени 1 реда и са изтрити 2 реда
  1. 1 2
      lisp/org.el

+ 1 - 2
lisp/org.el

@@ -6626,8 +6626,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