emacs-diffs
[Top][All Lists]
Advanced

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

master eb452df: ibuffer-mark-by-content-regexp: don't depend on `cl-some


From: Juanma Barranquero
Subject: master eb452df: ibuffer-mark-by-content-regexp: don't depend on `cl-some'
Date: Sun, 1 Dec 2019 04:42:23 -0500 (EST)

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

    ibuffer-mark-by-content-regexp: don't depend on `cl-some'
    
    * lisp/ibuf-ext.el (ibuffer-mark-by-content-regexp): Use `cl-dolist'
    instead of `cl-some' to avoid a run-time dependency on cl-lib that
    triggers an unreported bug similar to bug#38430.
---
 lisp/ibuf-ext.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index de3035e..375090e 100644
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -1861,8 +1861,9 @@ Otherwise buffers whose name matches an element of
          (cond ((and (not all-buffers)
                      (or
                       (memq mode ibuffer-never-search-content-mode)
-                      (cl-some (lambda (x) (string-match x (buffer-name buf)))
-                               ibuffer-never-search-content-name)))
+                      (cl-dolist (x ibuffer-never-search-content-name nil)
+                        (when-let ((found (string-match x (buffer-name buf))))
+                          (cl-return found)))))
                 (setq res nil))
                (t
                 (with-current-buffer buf



reply via email to

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