# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1197166205 0
# Node ID 066a2efbc9c8af37cdb6f47e135c5cd3e84b97b6
# Parent  5e1044759e6cb69ad3bd1609c6144c9dbdb0ad51
(declare-function): Add compatibility declaration.
(mail-abbrev-in-expansion-header-p): Declare as function.

diff -r 5e1044759e6c -r 066a2efbc9c8 lisp/gnus/message.el
--- a/lisp/gnus/message.el	Sun Dec 09 02:08:47 2007 +0000
+++ b/lisp/gnus/message.el	Sun Dec 09 02:10:05 2007 +0000
@@ -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 @@
   :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