diff options
author | Case Duckworth | 2022-05-06 10:23:57 -0500 |
---|---|---|
committer | Case Duckworth | 2022-05-06 10:23:57 -0500 |
commit | 6e7d7fe47d34a7e301ccf8027a234785bacb3297 (patch) | |
tree | ff210617e264c7d0ff633bcd8ac3398c17517010 /lisp/acdw.el | |
parent | meh (diff) | |
parent | Don't query to install pdf-tools (diff) | |
download | emacs-6e7d7fe47d34a7e301ccf8027a234785bacb3297.tar.gz emacs-6e7d7fe47d34a7e301ccf8027a234785bacb3297.zip |
Merge branch 'main' of tildegit.org:acdw/emacs
Diffstat (limited to 'lisp/acdw.el')
-rw-r--r-- | lisp/acdw.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/acdw.el b/lisp/acdw.el index 171a109..6707e76 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el | |||
@@ -107,8 +107,7 @@ on buffers derived from one of the modes in PREDICATE." | |||
107 | (let ((pred (or predicate t))) | 107 | (let ((pred (or predicate t))) |
108 | (dolist (buf (buffer-list)) | 108 | (dolist (buf (buffer-list)) |
109 | (with-current-buffer buf | 109 | (with-current-buffer buf |
110 | (when (cond ((or (eq (car-safe pred) 'closure) | 110 | (when (cond ((functionp pred) |
111 | (fboundp pred)) | ||
112 | (funcall pred)) | 111 | (funcall pred)) |
113 | ((listp pred) | 112 | ((listp pred) |
114 | (apply #'derived-mode-p pred)) | 113 | (apply #'derived-mode-p pred)) |