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 | |
| parent | fe86b5e0085e687c2977770477251260c011038c (diff) | |
| download | emacs-39c7e99daeb94a360f551f9c3b9d8372e71ea459.tar.gz | |
Add declare-function compatibility definition.
(nnkiboze-score-file): Declare as a function.
| -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 |