[elpa] externals/ebdb 2d74de4 345/350: Use autoload cookies on defclass statements

[Eric Abrahamsen]

branch: externals/ebdb
commit 2d74de48580ea387832d9d2f544572473edfc2e0
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>

    Use autoload cookies on defclass statements
    
    * ebdb.el: There was no reason to be calling `eieio-defclass-autoload'
      myself.
    * ebdb-gnus.el: add cookie
    * ebdb-org.el: etc
    * ebdb-pgp.el: etc
---
 ebdb-gnus.el |  4 ++--
 ebdb-org.el  |  2 +-
 ebdb-pgp.el  |  1 +
 ebdb.el      | 33 ---------------------------------
 4 files changed, 4 insertions(+), 36 deletions(-)

diff --git a/ebdb-gnus.el b/ebdb-gnus.el
index c89422c..586e5ef 100644
--- a/ebdb-gnus.el
+++ b/ebdb-gnus.el
@@ -52,6 +52,7 @@
 ;;; Gnus-specific field types.  All should subclass
 ;;; `ebdb-field-user'.
 
+;;;###autoload
 (defclass ebdb-gnus-score-field (ebdb-field-user)
   ((score
     :type (or null number)
@@ -160,8 +161,7 @@ addresses better than the traditionally static global 
scorefile."
 ;; Imap support (Uwe Brauer)
 ;;
 
-;; Why wouldn't we just use the same "private" field for imap? Why
-;; would this need to be a separate field class?
+;;;###autoload
 (defclass ebdb-gnus-imap-field (ebdb-field-user)
   ((group
     :type string
diff --git a/ebdb-org.el b/ebdb-org.el
index 07ebe09..011157e 100644
--- a/ebdb-org.el
+++ b/ebdb-org.el
@@ -125,7 +125,7 @@ potential tags for completion.")
 
 (push '(ebdb-org-field-tags ":" ":") ebdb-separator-alist)
 
-
+;;;###autoload
 (defclass ebdb-org-field-tags (ebdb-field-user)
   ((tags
     :type (list-of string)
diff --git a/ebdb-pgp.el b/ebdb-pgp.el
index e3eefae..bc9f391 100644
--- a/ebdb-pgp.el
+++ b/ebdb-pgp.el
@@ -105,6 +105,7 @@ See info node `(message)security'."
                        (symbol :tag "Encrypt method")))
   :group 'ebdb-utilities-pgp)
 
+;;;###autoload
 (defclass ebdb-field-pgp (ebdb-field-user)
   ((action
     :initarg :action
diff --git a/ebdb.el b/ebdb.el
index 22f811c..6b52893 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -5141,38 +5141,5 @@ prompt users for more complex search criteria, if 
necessary.")
   (read-string (format "Search records %smatching regexp: "
                        (if ebdb-search-invert "not " ""))))
 
-;; Create autoload statements for fields defined in other files.
-;; Might save users some small surprises.
-
-(eieio-defclass-autoload
- 'ebdb-org-field-tags
- 'ebdb-field-user
- "ebdb-org"
- "Field holding Org-style tags.")
-
-(eieio-defclass-autoload
- 'ebdb-gnus-score-field
- 'ebdb-field-user
- "ebdb-gnus"
- "Gnus field holding record score.")
-
-(eieio-defclass-autoload
- 'ebdb-gnus-private-field
- 'ebdb-field-user
- "ebdb-gnus"
- "Gnus field holding private mailbox name.")
-
-(eieio-defclass-autoload
- 'ebdb-gnus-imap-field
- 'ebdb-field-user
- "ebdb-gnus"
- "Gnus field holding private IMAP mailbox name.")
-
-(eieio-defclass-autoload
- 'ebdb-field-pgp
- 'ebdb-field-user
- "ebdb-pgp"
- "Field holding default pgp action when sending messages to this record.")
-
 (provide 'ebdb)
 ;;; ebdb.el ends here