Function: org-fold-hide-archived-subtrees

org-fold-hide-archived-subtrees is a byte-compiled function defined in org-fold.el.gz.

Signature

(org-fold-hide-archived-subtrees BEG END)

Documentation

Re-hide all archived subtrees after a visibility state change.

Aliases

org-hide-archived-subtrees (obsolete since 9.6)

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-fold.el.gz
(defun org-fold-hide-archived-subtrees (beg end)
  "Re-hide all archived subtrees after a visibility state change."
  (org-with-wide-buffer
   (let ((case-fold-search nil)
	 (re (concat org-outline-regexp-bol ".*:" org-archive-tag ":")))
     (goto-char beg)
     ;; Include headline point is currently on.
     (beginning-of-line)
     (while (and (< (point) end) (re-search-forward re end t))
       (when (member org-archive-tag (org-get-tags nil t))
	 (org-fold-subtree t)
	 (org-end-of-subtree t))))))