Function: org-string-width-invisibility-spec

org-string-width-invisibility-spec is a byte-compiled function defined in org-macs.el.

Signature

(org-string-width-invisibility-spec)

Documentation

Return the invisibility spec of this buffer without folds and ellipses.

Source Code

;; Defined in ~/.emacs.d/elpa/org-9.8.2/org-macs.el
(defun org-string-width-invisibility-spec ()
  "Return the invisibility spec of this buffer without folds and ellipses."
  ;; We need to remove the folds to make sure that folded table
  ;; alignment is not messed up.
  (or (and (not (listp buffer-invisibility-spec))
           buffer-invisibility-spec)
      (let (result)
        (dolist (el buffer-invisibility-spec)
          (unless (or (memq el
                            '(org-fold-drawer
                              org-fold-block
                              org-fold-outline))
                      (and (listp el)
                           (memq (car el)
                                 '(org-fold-drawer
                                   org-fold-block
                                   org-fold-outline))))
            (push
             ;; Consider ellipsis to have 0 width.
             ;; It is what Emacs 28+ does, but we have
             ;; to force it in earlier Emacs versions.
             (if (and (consp el) (cdr el))
                 (list (car el))
               el)
             result)))
        result)))