emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/leaf 1db35d4 19/46: format sexp


From: Stefan Monnier
Subject: [elpa] externals/leaf 1db35d4 19/46: format sexp
Date: Mon, 15 Mar 2021 22:20:44 -0400 (EDT)

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

    format sexp
---
 leaf.el | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/leaf.el b/leaf.el
index 04ac5ca..ed274a5 100644
--- a/leaf.el
+++ b/leaf.el
@@ -732,15 +732,12 @@ see `alist-get'."
 
 (with-eval-after-load 'find-func
   (defvar find-function-regexp-alist)
-  (add-to-list 'find-function-regexp-alist
-               '(leaf . leaf-find-regexp)))
+  (add-to-list 'find-function-regexp-alist '(leaf . leaf-find-regexp)))
 
 (defun leaf-find (name)
   "Find the leaf block of NAME."
   (interactive
-   (list (completing-read
-          "Find leaf: "
-          (delete-dups (mapcar #'car leaf--paths)))))
+   (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)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]