[Top][All Lists]

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

[elpa] master 25336fd 075/399: counsel.el (counsel-compile): counsel-com

From: Oleh Krehel
Subject: [elpa] master 25336fd 075/399: counsel.el (counsel-compile): counsel-compile-local-builds
Date: Sat, 20 Jul 2019 14:56:52 -0400 (EDT)

branch: master
commit 25336fdec30bed0bbc5603ce72f2d24ea41b41ae
Author: Alex Bennée <address@hidden>
Commit: Oleh Krehel <address@hidden>

    counsel.el (counsel-compile): counsel-compile-local-builds
    Remove the clumsy `listp' check which is not needed as
    counsel-compile-local-builds is documented to always be a list.
    Fixes #1966
 counsel.el | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/counsel.el b/counsel.el
index aae7393..39aa050 100644
--- a/counsel.el
+++ b/counsel.el
@@ -5262,10 +5262,7 @@ subdirectories that builds may be invoked in."
   "Return the list of compile commands.
 This is determined by `counsel-compile-local-builds', which see."
   (let (cands)
-    ;; FIXME: Shouldn't `counsel-compile-local-builds' always be a list?
-    (dolist (cmds (if (listp counsel-compile-local-builds)
-                      counsel-compile-local-builds
-                    (list counsel-compile-local-builds)))
+    (dolist (cmds counsel-compile-local-builds)
       (when (functionp cmds)
         (setq cmds (funcall cmds dir)))
       (when cmds

reply via email to

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