diff options
| author | Glenn Morris <rgm@gnu.org> | 2007-12-11 05:23:01 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2007-12-11 05:23:01 +0000 |
| commit | cdbd069ad0f04009a01b31bf775b1e3fb30b9c41 (patch) | |
| tree | 87c86e95df2e2f1d5ddce2d2153ef26917b76aea /lisp | |
| parent | 0f7cbeb9eafceb644cf51b7e5aa073751b4b96e0 (diff) | |
| download | emacs-cdbd069ad0f04009a01b31bf775b1e3fb30b9c41.tar.gz | |
Add declare-function compatibility definition.
(gnus-group-mark-article-read): Declare as a function.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/nnmaildir.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/gnus/nnmaildir.el b/lisp/gnus/nnmaildir.el index 829b3761cd3..05c19c27ee1 100644 --- a/lisp/gnus/nnmaildir.el +++ b/lisp/gnus/nnmaildir.el @@ -61,6 +61,10 @@ ) ] +;; For Emacs < 22.2. +(eval-and-compile + (unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))) + (eval-and-compile (require 'nnheader) (require 'gnus) @@ -1439,6 +1443,8 @@ by nnmaildir-request-article.") (defun nnmaildir-active-number (gname) 0) +(declare-function gnus-group-mark-article-read "gnus-group" (group article)) + (defun nnmaildir-request-expire-articles (ranges &optional gname server force) (let ((no-force (not force)) (group (nnmaildir--prepare server gname)) |