Function: org-element--cache-persist-before-read

org-element--cache-persist-before-read is a byte-compiled function defined in org-element.el.gz.

Signature

(org-element--cache-persist-before-read CONTAINER &optional ASSOCIATED)

Documentation

Avoid reading cache before Org mode is loaded.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-element.el.gz
(defun org-element--cache-persist-before-read (container &optional associated)
  "Avoid reading cache before Org mode is loaded."
  (when (equal container '(elisp org-element--cache))
    (if (not (and (plist-get associated :file)
                (get-file-buffer (plist-get associated :file))))
        'forbid
      (with-current-buffer (get-file-buffer (plist-get associated :file))
        (unless (and org-element-use-cache
                     org-element-cache-persistent
                     (derived-mode-p 'org-mode)
                     (equal (secure-hash 'md5 (current-buffer))
                            (plist-get associated :hash)))
          'forbid)))))