[elpa] externals/leaf 2edf0fc 20/46: use eq to compare symbols

[Stefan Monnier]

branch: externals/leaf
commit 2edf0fc0fe7c3ae52bf89e526e67590896a85299
Author: Naoya Yamashita <conao3@gmail.com>
Commit: Naoya Yamashita <conao3@gmail.com>

    use eq to compare symbols
---
 leaf.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/leaf.el b/leaf.el
index ed274a5..1637e96 100644
--- a/leaf.el
+++ b/leaf.el
@@ -740,7 +740,7 @@ see `alist-get'."
    (list (completing-read "Find leaf: " (delete-dups (mapcar #'car 
leaf--paths)))))
   (require 'find-func)
   (let* ((name (intern name))
-         (paths (flatten-tree (mapcar (lambda (a) (when (equal name (car a)) 
(cdr a))) leaf--paths)))
+         (paths (flatten-tree (mapcar (lambda (a) (when (eq name (car a)) (cdr 
a))) leaf--paths)))
          (path (if (= (length paths) 1) paths (list (completing-read "Select 
one: " paths))))
          (location (apply #'find-function-search-for-symbol name 'leaf path)))
     (prog1 (pop-to-buffer (car location))