From f6512b78a2858189ae66b750b020196b64110a18 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Thu, 5 May 2022 18:41:48 -0500
Subject: Fix a subtle bug in +mapc-some-buffers

---
 lisp/acdw.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'lisp/acdw.el')

diff --git a/lisp/acdw.el b/lisp/acdw.el
index a673e4a..7ef745d 100644
--- a/lisp/acdw.el
+++ b/lisp/acdw.el
@@ -107,8 +107,7 @@ on buffers derived from one of the modes in PREDICATE."
   (let ((pred (or predicate t)))
     (dolist (buf (buffer-list))
       (with-current-buffer buf
-        (when (cond ((or (eq (car-safe pred) 'closure)
-                         (fboundp pred))
+        (when (cond ((functionp pred)
                      (funcall pred))
                     ((listp pred)
                      (apply #'derived-mode-p pred))
-- 
cgit 1.4.1-21-gabe81