From e4f7ed9609d85f80f3f54dae7485f06a49fc4d3c Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Tue, 11 Jan 2022 16:01:03 -0600
Subject: Lots o changes at work

I need to fix +circe-define-filter or something
---
 lisp/acdw.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'lisp/acdw.el')

diff --git a/lisp/acdw.el b/lisp/acdw.el
index 603f46f..7cad67c 100644
--- a/lisp/acdw.el
+++ b/lisp/acdw.el
@@ -145,7 +145,10 @@ within a `with-current-buffer' form."
   (let ((pred (or predicate t)))
     (dolist (buf (buffer-list))
       (with-current-buffer buf
-        (when (if (fboundp pred) (funcall pred buf) pred)
+        (when (if (or (eq (car-safe pred) 'closure)
+                      (fboundp pred))
+                  (funcall pred buf)
+                pred)
           (funcall func))))))
 
 ;; https://github.com/cstby/emacs.d/blob/main/init.el#L67
-- 
cgit 1.4.1-21-gabe81