emacs-diffs
[Top][All Lists]
Advanced

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

master f225011: ibuffer-do-isearch: don't depend on `cl-values-list' (bu


From: Juanma Barranquero
Subject: master f225011: ibuffer-do-isearch: don't depend on `cl-values-list' (bug#38430)
Date: Sun, 1 Dec 2019 04:13:57 -0500 (EST)

branch: master
commit f22501185e7d5885270eadb5dc32ef267153f2ac
Author: Juanma Barranquero <address@hidden>
Commit: Juanma Barranquero <address@hidden>

    ibuffer-do-isearch: don't depend on `cl-values-list' (bug#38430)
    
    * lisp/ibuf-ext.el (ibuffer-generate-filter-groups): Don't call
    `cl-values-list'.  Our implementation of that function just
    checks that its argument is a list, and then returns it.  In
    this specific case, the argument is guaranteed to be a list.
---
 lisp/ibuf-ext.el | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index 13223de..de3035e 100644
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -761,11 +761,10 @@ specification, with the same structure as an element of 
the list
       (dolist (filtergroup filter-group-alist)
        (let ((filterset (cdr filtergroup)))
          (cl-multiple-value-bind (hip-crowd lamers)
-             (cl-values-list
-              (ibuffer-split-list (lambda (bufmark)
-                                    (ibuffer-included-in-filters-p (car 
bufmark)
-                                                                   filterset))
-                                  bmarklist))
+             (ibuffer-split-list (lambda (bufmark)
+                                   (ibuffer-included-in-filters-p (car bufmark)
+                                                                  filterset))
+                                 bmarklist)
            (aset vec i hip-crowd)
            (cl-incf i)
            (setq bmarklist lamers))))



reply via email to

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