Mercurial > emacs
changeset 87248:617739001662
(turn-on-gnus-mailing-list-mode)
(gnus-cache-write-active, mm-uu-dissect, idna-to-unicode): Declare as functions.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Tue, 11 Dec 2007 05:44:54 +0000 |
| parents | 9d87abf9e764 |
| children | cd9c122de2ca |
| files | lisp/gnus/gnus-sum.el |
| diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el Tue Dec 11 05:44:18 2007 +0000 +++ b/lisp/gnus/gnus-sum.el Tue Dec 11 05:44:54 2007 +0000 @@ -2962,6 +2962,9 @@ (setq headers (cdr headers))) (list (nreverse outh)))))))) + +(declare-function turn-on-gnus-mailing-list-mode "gnus-ml" ()) + (defun gnus-summary-mode (&optional group) @@ -6951,6 +6954,8 @@ (gnus-save-newsrc-file) (gnus-dribble-save))) +(declare-function gnus-cache-write-active "gnus-cache" (&optional force)) + (defun gnus-summary-exit (&optional temporary leave-hidden) "Exit reading current newsgroup, and then return to group selection mode. `gnus-exit-group-hook' is called with no arguments if that value is non-nil." @@ -9442,6 +9447,8 @@ ;; Create buttons and stuff... (gnus-treat-article nil)) +(declare-function idna-to-unicode "ext:idna" (str)) + (defun gnus-summary-idna-message (&optional arg) "Decode IDNA encoded domain names in the current articles. IDNA encoded domain names looks like `xn--bar'. If a string @@ -11797,6 +11804,7 @@ encoded))) (defvar gnus-summary-save-parts-counter) +(declare-function mm-uu-dissect "mm-uu" (&optional noheader mime-type)) (defun gnus-summary-save-parts (type dir n &optional reverse) "Save parts matching TYPE to DIR.