Silence some gnus compilation warnings

[gnu-emacs] / lisp / gnus / registry.el

diff --git a/lisp/gnus/registry.el b/lisp/gnus/registry.el
index 9830fc30c9877da42869032312c9b85364b20077..79f07812b2d0e15e6857986a7fe8f3afe0443e95 100644 (file)
--- a/lisp/gnus/registry.el
+++ b/lisp/gnus/registry.el
@@ -249,6 +249,11 @@ With assert non-nil, errors out if the key does not exist already."
          (remhash key data)))
       keys))
 
+  (defmethod registry-size ((db registry-db))
+    "Returns the size of the registry-db object THIS.
+This is the key count of the :data slot."
+    (hash-table-count (oref db :data)))
+
   (defmethod registry-full ((db registry-db))
     "Checks if registry-db THIS is full."
     (>= (registry-size db)
@@ -297,11 +302,6 @@ Errors out if the key exists already."
                 (registry-lookup-secondary-value db tr val value-keys))))
           (oref db :data))))))
 
-  (defmethod registry-size ((db registry-db))
-    "Returns the size of the registry-db object THIS.
-This is the key count of the :data slot."
-    (hash-table-count (oref db :data)))
-
   (defmethod registry-prune ((db registry-db) &optional sortfun)
     "Prunes the registry-db object THIS.
 Removes only entries without the :precious keys if it can,