Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
d1e12aef
Commit
d1e12aef
authored
Jan 05, 2014
by
Katsumi Yamaoka
Browse files
Gnus: Silence the byte compiler
parent
81c7d631
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
13 additions
and
1 deletion
+13
-1
lisp/gnus/ChangeLog
lisp/gnus/ChangeLog
+7
-0
lisp/gnus/gnus-sum.el
lisp/gnus/gnus-sum.el
+4
-1
lisp/gnus/mm-util.el
lisp/gnus/mm-util.el
+2
-0
No files found.
lisp/gnus/ChangeLog
View file @
d1e12aef
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):
...
...
lisp/gnus/gnus-sum.el
View file @
d1e12aef
...
...
@@ -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)
...
...
lisp/gnus/mm-util.el
View file @
d1e12aef
...
...
@@ -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
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment