From ddca762329b89ebcf656effd8e327ee9e26723de Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Sat, 14 Jan 2023 12:24:13 +0300 Subject: [PATCH] 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 ccecec342..b9e93f60e 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