branch: externals/ebdb
commit fb10925183b29fd173fb97552334b25d6e433865
Author: Eric Abrahamsen <e...@ericabrahamsen.net>
Commit: Eric Abrahamsen <e...@ericabrahamsen.net>
Add an arbitrary comment slot to all fields
* ebdb.el (ebdb-field): New slot inherited by all fields; not sure how
to deal with this yet.
---
ebdb.el | 10 +++++++++-
1 file changed, 9 insertions(+), 1 deletion(-)
diff --git a/ebdb.el b/ebdb.el
index f49a063583..5028143e2e 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -962,7 +962,15 @@ Test for presence is done with `equal'."
:initform nil
:documentation
"A list of actions which this field can perform. Each list
- element is a cons of string name and function name."))
+ element is a cons of string name and function name.")
+ (comment
+ :type (or null string)
+ :custom (choice (const :tag "No comment" nil)
+ (string :tag "Comment"))
+ :initarg :comment
+ :initform nil
+ :documentation
+ "Arbitrary comment on this field value"))
:abstract t :documentation "Abstract class for EBDB fields.
Subclass this to produce real field types.")
