[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ebdb 2a25117 6/9: New option ebdb-print-object-name
From: |
Eric Abrahamsen |
Subject: |
[elpa] externals/ebdb 2a25117 6/9: New option ebdb-print-object-name |
Date: |
Sun, 18 Feb 2018 22:56:25 -0500 (EST) |
branch: externals/ebdb
commit 2a251170a3e11d13c1550c3f1e236793f037f29a
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>
New option ebdb-print-object-name
* ebdb.el (ebdb-print-object-name): Local equivalent to
eieio-print-object-name.
(ebdb-db-save): Set eieio variable based on this option.
---
ebdb.el | 17 +++++++++++++++--
1 file changed, 15 insertions(+), 2 deletions(-)
diff --git a/ebdb.el b/ebdb.el
index de396a5..b3cf84c 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -182,7 +182,7 @@ to errors or database corruption."
:type 'boolean)
;; Do not use this to prevent writing of object-names via
-;; `eieio-print-object-names', older Emacs will choke if it's not
+;; `eieio-print-object-name', older Emacs will choke if it's not
;; present.
(defcustom ebdb-vacuum-databases t
"When non-nil, minimize the size of database files.
@@ -192,6 +192,18 @@ in the future more shrinkage may be possible."
:group 'ebdb-eieio
:type 'boolean)
+(defcustom ebdb-print-object-name t
+ "When non-nil, print object names in the database files.
+This is an EBDB-specific version of the option
+`eieio-print-object-name', which only exists in Emacs 27 or
+higher. It will have no effect in earlier versions of Emacs, but
+do note that Emacs 26 or lower REQUIRES that the name be present,
+and will raise an error if it is not. If there's a chance that a
+database might be written by a newer Emacs, and read by an older,
+do not set this to nil."
+ :group 'ebdb-eieio
+ :type 'boolean)
+
(defgroup ebdb nil
"EBDB customizations"
:group 'news
@@ -3853,7 +3865,8 @@ the persistent save, or allow them to propagate.")
(cl-defmethod ebdb-db-save ((db ebdb-db) &optional _prompt force)
"Mark DB and all its records as \"clean\" after saving."
(let ((recs (ebdb-dirty-records (slot-value db 'records)))
- (eieio-print-indentation (null ebdb-vacuum-databases)))
+ (eieio-print-indentation (null ebdb-vacuum-databases))
+ (eieio-print-object-name ebdb-print-object-name))
(when (or force recs (slot-value db 'dirty))
(setf (slot-value db 'dirty) nil)
(dolist (r recs)
- [elpa] externals/ebdb updated (5735686 -> 2c71ef9), Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb c07f50b 2/9: Get rid of ebdb-version, Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb 6395a75 1/9: Manipulation of ebdb-db-list *still* in the wrong place, Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb 4796722 3/9: Fix mail sorting, Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb 7f51a4e 5/9: Make explicit "full" formatter, Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb 2c71ef9 9/9: Bump EBDB version to 0.4.3, Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb 2a25117 6/9: New option ebdb-print-object-name,
Eric Abrahamsen <=
- [elpa] externals/ebdb 9102219 7/9: Re-work ebdb-records-cite, Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb 44cce48 8/9: Absorb helm-ebdb package, rename to ebdb-helm, Eric Abrahamsen, 2018/02/18
- [elpa] externals/ebdb 639694c 4/9: Docstring changes, Eric Abrahamsen, 2018/02/18