From: Philip Kaludercic <philipk@posteo.net>
Date: Fri, 29 Jul 2022 11:54:47 +0000 (+0200)
Subject: * subr.el (buffer-match-p): Add t as trivial a condition
X-Git-Tag: emacs-29.0.90~1447^2~663
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=497b2689dad0770cd90ba0410a7a120ad94b6def;p=emacs.git

* subr.el (buffer-match-p): Add t as trivial a condition
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 6b121a314a9..9f7cb3ab6a9 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -6899,6 +6899,7 @@ lines."
 (defun buffer-match-p (condition buffer-or-name &optional arg)
   "Return non-nil if BUFFER-OR-NAME matches CONDITION.
 CONDITION is either:
+- the symbol t, to always match
 - a regular expression, to match a buffer name,
 - a predicate function that takes a buffer object and ARG as
   arguments, and returns non-nil if the buffer matches,
@@ -6921,6 +6922,7 @@ CONDITION is either:
           (catch 'match
             (dolist (condition conditions)
               (when (cond
+                     ((eq condition t))
                      ((stringp condition)
                       (string-match-p condition (buffer-name buffer)))
                      ((functionp condition)