summaryrefslogtreecommitdiff
path: root/lisp/gnus
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2007-12-11 05:25:23 +0000
committerGlenn Morris <rgm@gnu.org>2007-12-11 05:25:23 +0000
commit75327e9460257356ddae092997af290cec794550 (patch)
tree88888d84543a60beafcb0fadbdd1b0f350a2436b /lisp/gnus
parent8867ac549103837c58e20949bc78bf33814a9238 (diff)
downloademacs-75327e9460257356ddae092997af290cec794550.tar.gz
emacs-75327e9460257356ddae092997af290cec794550.tar.bz2
emacs-75327e9460257356ddae092997af290cec794550.zip
Add declare-function compatibility definition.
(gnus-request-group): Autoload it. (gnus-request-create-group): Declare as a function.
Diffstat (limited to 'lisp/gnus')
-rw-r--r--lisp/gnus/nnfolder.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/gnus/nnfolder.el b/lisp/gnus/nnfolder.el
index bf82791fea6..8dc28a3eaf6 100644
--- a/lisp/gnus/nnfolder.el
+++ b/lisp/gnus/nnfolder.el
@@ -31,6 +31,10 @@
;;; Code:
+;; For Emacs < 22.2.
+(eval-and-compile
+ (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
(require 'nnheader)
(require 'message)
(require 'nnmail)
@@ -429,6 +433,10 @@ the group. Then the marks file will be regenerated properly by Gnus.")
;; The article numbers are increasing, so this result is sorted.
(nreverse numbers)))))
+(autoload 'gnus-request-group "gnus-int")
+(declare-function gnus-request-create-group "gnus-int"
+ (group &optional gnus-command-method args))
+
(deffoo nnfolder-request-expire-articles (articles newsgroup
&optional server force)
(nnfolder-possibly-change-group newsgroup server)