diff options
author | Glenn Morris <rgm@gnu.org> | 2007-12-11 05:45:43 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2007-12-11 05:45:43 +0000 |
commit | 39c7e99daeb94a360f551f9c3b9d8372e71ea459 (patch) | |
tree | a73bac95a4c2049e4cd40df53e508b68d0a30d80 /lisp/gnus | |
parent | fe86b5e0085e687c2977770477251260c011038c (diff) | |
download | emacs-39c7e99daeb94a360f551f9c3b9d8372e71ea459.tar.gz emacs-39c7e99daeb94a360f551f9c3b9d8372e71ea459.tar.bz2 emacs-39c7e99daeb94a360f551f9c3b9d8372e71ea459.zip |
Add declare-function compatibility definition.
(nnkiboze-score-file): Declare as a function.
Diffstat (limited to 'lisp/gnus')
-rw-r--r-- | lisp/gnus/gnus-group.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index 5843214e48a..73d632591b5 100644 --- a/lisp/gnus/gnus-group.el +++ b/lisp/gnus/gnus-group.el @@ -27,6 +27,10 @@ ;;; Code: +;; For Emacs < 22.2. +(eval-and-compile + (unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))) + (eval-when-compile (require 'cl)) (defvar tool-bar-mode) @@ -3004,6 +3008,8 @@ mail messages or news articles in files that have numeric names." (list 'nndir (gnus-group-real-name group) (list 'nndir-directory dir))))) (defvar nnkiboze-score-file) +(declare-function nnkiboze-score-file "nnkiboze" (group)) + (defun gnus-group-make-kiboze-group (group address scores) "Create an nnkiboze group. The user will be prompted for a name, a regexp to match groups, and |