mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-22 07:09:54 +00:00
Gnus: Silence the byte compiler
This commit is contained in:
parent
81c7d631e9
commit
d1e12aefa6
@ -1,3 +1,10 @@
|
||||
2014-01-05 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus-sum.el (gnus-article-stop-animations): Declare it before using.
|
||||
(nnimap-split-fancy, nnimap-split-methods): Declare.
|
||||
|
||||
* mm-util.el (help-function-arglist): Declare.
|
||||
|
||||
2013-12-28 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* gnus-sieve.el (gnus-sieve-select-method):
|
||||
|
@ -7216,6 +7216,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
|
||||
(gnus-dribble-save)))
|
||||
|
||||
(declare-function gnus-cache-write-active "gnus-cache" (&optional force))
|
||||
(declare-function gnus-article-stop-animations "gnus-art" ())
|
||||
|
||||
(defun gnus-summary-exit (&optional temporary leave-hidden)
|
||||
"Exit reading current newsgroup, and then return to group selection mode.
|
||||
@ -7320,7 +7321,6 @@ If FORCE (the prefix), also save the .newsrc file(s)."
|
||||
(unless quit-config
|
||||
(setq gnus-newsgroup-name nil)))))
|
||||
|
||||
(declare-function gnus-article-stop-animations "gnus-art" ())
|
||||
(declare-function gnus-stop-downloads "gnus-art" ())
|
||||
|
||||
(defalias 'gnus-summary-quit 'gnus-summary-exit-no-update)
|
||||
@ -10659,6 +10659,9 @@ groups."
|
||||
|
||||
;;; Respooling
|
||||
|
||||
(defvar nnimap-split-fancy)
|
||||
(defvar nnimap-split-methods)
|
||||
|
||||
(defun gnus-summary-respool-query (&optional silent trace)
|
||||
"Query where the respool algorithm would put this article."
|
||||
(interactive)
|
||||
|
@ -1378,6 +1378,8 @@ If INHIBIT is non-nil, inhibit `mm-inhibit-file-name-handlers'."
|
||||
(write-region start end filename append visit lockname)))
|
||||
|
||||
(autoload 'gmm-write-region "gmm-utils")
|
||||
(declare-function help-function-arglist "help-fns"
|
||||
(def &optional preserve-names))
|
||||
|
||||
;; It is not a MIME function, but some MIME functions use it.
|
||||
(if (and (fboundp 'make-temp-file)
|
||||
|
Loading…
Reference in New Issue
Block a user