# HG changeset patch # User Glenn Morris # Date 1197351943 0 # Node ID cdbb1d6ce4337e4805280587a8ae0f1fff9c7a40 # Parent cd9c122de2cad0ece6ec0f34b6bd5c4c1618f492 Add declare-function compatibility definition. (nnkiboze-score-file): Declare as a function. diff -r cd9c122de2ca -r cdbb1d6ce433 lisp/gnus/gnus-group.el --- a/lisp/gnus/gnus-group.el Tue Dec 11 05:45:10 2007 +0000 +++ b/lisp/gnus/gnus-group.el Tue Dec 11 05:45:43 2007 +0000 @@ -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 @@ (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