[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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master eb452df: ibuffer-mark-by-content-regexp: don't depend on `cl-some',
Juanma Barranquero <=