[elpa] externals/leaf 3e28eb0 31/46: fix list minor issue

[Stefan Monnier]

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

    fix list minor issue
---
 leaf.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/leaf.el b/leaf.el
index c5cedbb..1493072 100644
--- a/leaf.el
+++ b/leaf.el
@@ -755,7 +755,7 @@ see `alist-get'."
   (require 'find-func)
   (let* ((name (intern name))
          (paths (mapcan (lambda (elm) (when (eq name (car elm)) (list (cdr 
elm)))) leaf--paths))
-         (path (if (= (length paths) 1) paths (list (completing-read "Select 
one: " paths))))
+         (path (if (= (length paths) 1) (car paths) (completing-read "Select 
one: " paths)))
          (location (find-function-search-for-symbol name 'leaf path)))
     (when location
       (prog1 (pop-to-buffer (car location))