diff options
| -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 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." | |||
| 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)) |