[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ebdb 7631f3c 3/3: Use derived-mode-p
From: |
Eric Abrahamsen |
Subject: |
[elpa] externals/ebdb 7631f3c 3/3: Use derived-mode-p |
Date: |
Thu, 9 Nov 2017 18:12:46 -0500 (EST) |
branch: externals/ebdb
commit 7631f3c8c59a8e7c71e3dbc09c532f1075d8d4ba
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>
Use derived-mode-p
* ebdb-com.el (ebdb-redisplay-records): Instead of checking
major-mode.
---
ebdb-com.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/ebdb-com.el b/ebdb-com.el
index b763491..16c6f2e 100644
--- a/ebdb-com.el
+++ b/ebdb-com.el
@@ -878,10 +878,10 @@ SORT is t, usually because RECORDS have new sortkeys,
re-sort the
displayed records."
(let ((bufs (if all-buffers
(seq-filter (lambda (b)
- (eq (buffer-local-value 'major-mode b)
- 'ebdb-mode))
+ (with-current-buffer b
+ (derived-mode-p 'ebdb-mode)))
(buffer-list))
- (and (eq major-mode 'ebdb-mode)
+ (and (derived-mode-p 'ebdb-mode)
(list (current-buffer)))))
local-record renumber-index marker end-marker record-number ret)
(setq records (ebdb-record-list records))