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

[Oleh Krehel]

branch: master
commit 25336fdec30bed0bbc5603ce72f2d24ea41b41ae
Author: Alex Bennée <alex.ben...@linaro.org>
Commit: Oleh Krehel <ohwoeo...@gmail.com>

    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