branch: externals/ebdb
commit 2b52686b9c8c63318da09be9b18d8d2109f743b0
Author: Eric Abrahamsen <[email protected]>
Commit: Eric Abrahamsen <[email protected]>
Check type spec of slots that may or may not accept an object
* ebdb.el (ebdb-field-bank-account): A type spec that looks like `(or
null class-name)' *must* specify the null first, then the class
name. Putting the class name first results in an error. This seems
like a bug to me -- it's an `or' statement, it shouldn't matter.
---
ebdb.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/ebdb.el b/ebdb.el
index fad9363..18896ad 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -2203,7 +2203,7 @@ See `ebdb-url-valid-schemes' for a list of acceptable
schemes."
:documentation "Bank name")
(bank-address
:initarg :bank-address
- :type (or ebdb-field-address null)
+ :type (or null ebdb-field-address)
:initform nil
;; :custom (choice ebdb-field-address
;; (const :tag "No address" nil))
@@ -2233,7 +2233,7 @@ See `ebdb-url-valid-schemes' for a list of acceptable
schemes."
:documentation "A list of account labels and numbers/IBANs")
(notes
:initarg :notes
- :type (or ebdb-field-notes null)
+ :type (or null ebdb-field-notes)
;; :custom (choice ebdb-field-notes
;; (const :tag "No notes" nil))
:initform nil
