[elpa] externals/leaf 641672c 35/46: expand leaf--paths initialize sexp

[Stefan Monnier]

branch: externals/leaf
commit 641672cdbf4035c6271c5c734ca98c3b4703cc06
Author: Naoya Yamashita <con...@gmail.com>
Commit: Naoya Yamashita <con...@gmail.com>

    expand leaf--paths initialize sexp
---
 leaf-tests.el | 1 +
 leaf.el       | 1 +
 2 files changed, 2 insertions(+)

diff --git a/leaf-tests.el b/leaf-tests.el
index e8e4071..ff4f92d 100644
--- a/leaf-tests.el
+++ b/leaf-tests.el
@@ -2204,6 +2204,7 @@ Example:
 
     ((leaf-handler-leaf-path leaf)
      (let ((file (or load-file-name buffer-file-name 
byte-compile-current-file)))
+       (unless (boundp 'leaf--paths) (defvar leaf--paths nil))
        (when file
          (add-to-list 'leaf--paths (cons 'leaf file)))))))
 
diff --git a/leaf.el b/leaf.el
index 1c3b2eb..fc06636 100644
--- a/leaf.el
+++ b/leaf.el
@@ -972,6 +972,7 @@ FN also accept list of FN."
   `(let ((file (or load-file-name
                    buffer-file-name
                    byte-compile-current-file)))
+     (unless (boundp 'leaf--paths) (defvar leaf--paths nil))
      (when file
       (add-to-list 'leaf--paths (cons ',name file)))))