Mercurial > emacs
changeset 87231:f77f4c589557
Add declare-function compatibility definition.
(gnus-group-mark-article-read): Declare as a function.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Tue, 11 Dec 2007 05:23:01 +0000 |
parents | 3b4311ae0926 |
children | 0f083156a012 |
files | lisp/gnus/nnmaildir.el |
diffstat | 1 files changed, 6 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/nnmaildir.el Tue Dec 11 05:22:34 2007 +0000 +++ b/lisp/gnus/nnmaildir.el Tue Dec 11 05:23:01 2007 +0000 @@ -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 @@ (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))