[elpa] externals/leaf 39e0359 37/46: Merge pull request #480 from conao3/feature#479

[Stefan Monnier]

branch: externals/leaf
commit 39e0359c93414f72af068a1510e5b694e6c292fd
Merge: cb35aac b04f3ba
Author: Naoya Yamashita <conao3@gmail.com>
Commit: GitHub <noreply@github.com>

    Merge pull request #480 from conao3/feature#479
    
    feature#479
---
 leaf-tests.el | 1 +
 leaf.el       | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

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..933194b 100644
--- a/leaf.el
+++ b/leaf.el
@@ -5,7 +5,7 @@
 ;; Author: Naoya Yamashita <conao3@gmail.com>
 ;; Maintainer: Naoya Yamashita <conao3@gmail.com>
 ;; Keywords: lisp settings
-;; Version: 4.3.7
+;; Version: 4.3.8
 ;; URL: https://github.com/conao3/leaf.el
 ;; Package-Requires: ((emacs "24.1"))
 
@@ -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)))))