diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2023-08-13 22:11:45 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2023-08-13 22:11:45 -0400 |
| commit | 3eff53b4564ba7633807d67708dc9337765db259 (patch) | |
| tree | aeb66427fb00a6b533a725ab240254a35c8abd9a /lisp/org/org-element.el | |
| parent | c42970d7758c43a74ebd09ff506525d879d03708 (diff) | |
| download | emacs-3eff53b4564ba7633807d67708dc9337765db259.tar.gz emacs-3eff53b4564ba7633807d67708dc9337765db259.tar.bz2 emacs-3eff53b4564ba7633807d67708dc9337765db259.zip | |
Update to Org 9.6.7-13-g99cc96
Diffstat (limited to 'lisp/org/org-element.el')
| -rw-r--r-- | lisp/org/org-element.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/org/org-element.el b/lisp/org/org-element.el index df43ebcf0c5..296468eed1a 100644 --- a/lisp/org/org-element.el +++ b/lisp/org/org-element.el @@ -6567,7 +6567,9 @@ If you observe Emacs hangs frequently, please report this to Org mode mailing li ;; Make sure that we return referenced element in cache ;; that can be altered directly. (if element - (setq element (or (org-element--cache-put element) element)) + (progn + (org-element-put-property element :granularity 'element) + (setq element (or (org-element--cache-put element) element))) ;; Nothing to parse (i.e. empty file). (throw 'exit parent)) (unless (or (not (org-element--cache-active-p)) parent) @@ -6942,12 +6944,13 @@ known element in cache (it may start after END)." (let ((current (org-with-point-at (org-element-property :begin up) (org-element-with-disabled-cache (and (looking-at-p org-element-headline-re) - (org-element-headline-parser)))))) + (org-element-headline-parser nil 'fast)))))) (when (eq 'headline (org-element-type current)) (org-element--cache-log-message "Found non-robust headline that can be updated individually: %S" (org-element--format-element current)) (org-element-set-element up current) + (org-element-put-property up :granularity 'element) t))) ;; If UP is org-data, the situation is similar to ;; headline case. We just need to re-parse the |