summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2007-12-09 02:10:05 +0000
committerGlenn Morris <rgm@gnu.org>2007-12-09 02:10:05 +0000
commitb43906b677ba264cd3ca6324b6cd6ec1505b5bbb (patch)
tree610e771e2019731a61a12141db44c4f59815ba31 /lisp
parent88bfa2e405c457e05f6a481344c511fdfde2ebba (diff)
downloademacs-b43906b677ba264cd3ca6324b6cd6ec1505b5bbb.tar.gz
emacs-b43906b677ba264cd3ca6324b6cd6ec1505b5bbb.tar.bz2
emacs-b43906b677ba264cd3ca6324b6cd6ec1505b5bbb.zip
(declare-function): Add compatibility declaration.
(mail-abbrev-in-expansion-header-p): Declare as function.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/message.el6
1 files changed, 5 insertions, 1 deletions
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