emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org 30f1f18 2/5: org-element-cache-map: Improve speed


From: ELPA Syncer
Subject: [elpa] externals/org 30f1f18 2/5: org-element-cache-map: Improve speed
Date: Mon, 25 Oct 2021 09:57:30 -0400 (EDT)

branch: externals/org
commit 30f1f187d12d861717498321dcd71e4b9878b584
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    org-element-cache-map: Improve speed
    
    * lisp/org-element.el (org-element-cache-map): Remove unnecessary
    expensive let binding.
---
 lisp/org-element.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/org-element.el b/lisp/org-element.el
index dbdacee..ebde90d 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -7048,8 +7048,7 @@ of FUNC.  Changes to elements made in FUNC will also 
alter the cache."
                       ;; Find expected begin position of an element after
                       ;; DATA.
                       (next-element-start
-                       (data) `(let (next-start
-                                     (data ,data))
+                       (data) `(let (next-start)
                                  (if (memq granularity '(headline 
headline+inlinetask))
                                      (setq next-start (or (when (memq 
(org-element-type data) '(headline org-data))
                                                             
(org-element-property :contents-begin data))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]