Gnus: silence the byte compiler

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

diff --git a/lisp/gnus/gnus-cloud.el b/lisp/gnus/gnus-cloud.el
index 62a25d7b9e0a06bfd46e3a69d98c933a0e75e83f..c47976bdcfa851db94c72b5ff6b7d175babde027 100644 (file)
--- a/lisp/gnus/gnus-cloud.el
+++ b/lisp/gnus/gnus-cloud.el
@@ -125,7 +125,7 @@
        (let ((spec (ignore-errors (read (current-buffer))))
              length)
          (when (and (consp spec)
-                    (memq (getf spec :type) '(:file :data :deleta)))
+                    (memq (plist-get spec :type) '(:file :data :deleta)))
            (setq length (plist-get spec :length))
            (push (append spec
                          (list
@@ -229,6 +229,11 @@
              (string< old timestamp))
       timestamp)))
 
+(declare-function gnus-activate-group "gnus-start"
+                 (group &optional scan dont-check method dont-sub-check))
+(declare-function gnus-subscribe-group "gnus-start"
+                 (group &optional previous method))
+
 (defun gnus-cloud-ensure-cloud-group ()
   (let ((method (if (stringp gnus-cloud-method)
                    (gnus-server-to-method gnus-cloud-method)