branch: externals/ebdb
commit 2a17bb6d3e4d5f78339c8b8f44eb3a77c3775024
Author: Eric Abrahamsen <e...@ericabrahamsen.net>
Commit: Eric Abrahamsen <e...@ericabrahamsen.net>
Set up EBDB buffers to offer save on save-some-buffers
* ebdb-com.el (ebdb-mode): As of around now, `save-some-buffers' will
accept for an `always' value for `buffer-offer-save'.
---
ebdb-com.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/ebdb-com.el b/ebdb-com.el
index c33de0e..0723d2e 100644
--- a/ebdb-com.el
+++ b/ebdb-com.el
@@ -1050,7 +1050,8 @@ Derives from `special-mode'; the usual `special-mode'
bindings apply.
'ebdb-redisplay-all-records)
;; In newer Emacs, this will make EBDB buffers eligible for save by
;; `save-some-buffers'.
- (setq write-contents-functions (list #'ebdb-save))
+ (add-hook 'write-contents-functions #'ebdb-save)
+ (setq buffer-offer-save 'always)
(when ebdb-mail-alias-alist
(ebdb-mail-aliases))
(add-hook 'post-command-hook 'force-mode-line-update nil t))
