0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-07-16 16:16:29 +00:00

org-element: Fix cache bug

* lisp/org-element.el (org-element-context): First initialize cache
  before retrieving data from it.
This commit is contained in:
Nicolas Goaziou 2014-02-26 14:55:45 +01:00
parent dddebc26c8
commit ef207f4424

View file

@ -5782,8 +5782,10 @@ Providing it allows for quicker computation."
(let* ((restriction (org-element-restriction type)) (let* ((restriction (org-element-restriction type))
(parent element) (parent element)
(candidates 'initial) (candidates 'initial)
(cache (and (org-element--cache-active-p) (cache (cond ((not (org-element--cache-active-p)) nil)
(gethash element org-element--cache-objects))) (org-element--cache-objects
(gethash element org-element--cache-objects))
(t (org-element-cache-reset) nil)))
objects-data next) objects-data next)
(prog1 (prog1
(catch 'exit (catch 'exit