branch: externals/org
commit ddca762329b89ebcf656effd8e327ee9e26723de
Author: Ihor Radchenko <yanta...@posteo.net>
Commit: Ihor Radchenko <yanta...@posteo.net>
org-element--cache-verify-element: Format all the elements in warning
* lisp/org-element.el (org-element--cache-verify-element): Use
`org-element--format-element' to print all the elements.
---
lisp/org-element.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/org-element.el b/lisp/org-element.el
index ccecec342f..b9e93f60e1 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -7208,9 +7208,9 @@ The element is: %S\n The real element is: %S\n Cache
around :begin:\n%S\n%S\n%S"
"no" "yes")
(org-element--format-element element)
(org-element--format-element real-element)
- (org-element--cache-find (1-
(org-element-property :begin real-element)))
- (car (org-element--cache-find
(org-element-property :begin real-element) 'both))
- (cdr (org-element--cache-find
(org-element-property :begin real-element) 'both)))
+ (org-element--format-element
(org-element--cache-find (1- (org-element-property :begin real-element))))
+ (org-element--format-element (car
(org-element--cache-find (org-element-property :begin real-element) 'both)))
+ (org-element--format-element (cdr
(org-element--cache-find (org-element-property :begin real-element) 'both))))
(org-element-cache-reset))))))
;;; Cache persistence
