[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 69dbe86 3/4: org-element: Silence byte-compiler
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 69dbe86 3/4: org-element: Silence byte-compiler |
Date: |
Sat, 20 Nov 2021 13:57:26 -0500 (EST) |
branch: externals/org
commit 69dbe86625e82107c6ed50203edd1258ca189d1c
Author: Kyle Meyer <kyle@kyleam.com>
Commit: Kyle Meyer <kyle@kyleam.com>
org-element: Silence byte-compiler
* lisp/org-element.el (org-element--cache-gapless): Move definition
before first use to remove byte-compiler warning about assignment to
free variable.
---
lisp/org-element.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/lisp/org-element.el b/lisp/org-element.el
index 8102387..4ffc15e 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -6964,6 +6964,11 @@ The element is: %S\n The real element is: %S\n Cache
around :begin:\n%S\n%S\n%S"
;;;; Public Functions
+(defvar-local org-element--cache-gapless nil
+ "An alist containing (granularity . `org-element--cache-change-tic')
elements.
+Each element indicates the latest `org-element--cache-change-tic' when
+change did not contain gaps.")
+
;;;###autoload
(defun org-element-cache-reset (&optional all)
"Reset cache in current buffer.
@@ -7007,10 +7012,7 @@ buffers."
(org-element--cache-set-timer (current-buffer))))
(defvar warning-minimum-log-level) ; Defined in warning.el
-(defvar-local org-element--cache-gapless nil
- "An alist containing (granularity . `org-element--cache-change-tic')
elements.
-Each element indicates the latest `org-element--cache-change-tic' when
-change did not contain gaps.")
+
(defvar org-element-cache-map--recurse nil)
;;;###autoload
(cl-defun org-element-cache-map (func &key (granularity 'headline+inlinetask)
restrict-elements