branch: externals/leaf
commit 39e0359c93414f72af068a1510e5b694e6c292fd
Merge: cb35aac b04f3ba
Author: Naoya Yamashita <con...@gmail.com>
Commit: GitHub <nore...@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 <con...@gmail.com>
;; Maintainer: Naoya Yamashita <con...@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)))))
