From b43906b677ba264cd3ca6324b6cd6ec1505b5bbb Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Sun, 9 Dec 2007 02:10:05 +0000
Subject: [PATCH] (declare-function): Add compatibility declaration.
 (mail-abbrev-in-expansion-header-p): Declare as function.

---
 lisp/gnus/message.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 3aaa8c25745..919a4c06721 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -31,9 +31,11 @@
 
 ;;; Code:
 
+(eval-and-compile
+  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
 (eval-when-compile
   (require 'cl))
-  
+
 (require 'hashcash)
 (require 'canlock)
 (require 'mailheader)
@@ -7474,6 +7476,8 @@ If nil, the function bound in `text-mode-map' or `global-map' is executed."
   :type '(choice (const nil)
 		 function))
 
+(declare-function mail-abbrev-in-expansion-header-p "mailabbrev" ())
+
 (defun message-tab ()
   "Complete names according to `message-completion-alist'.
 Execute function specified by `message-tab-body-function' when not in
-- 
2.39.2