(declare-function): Add compatibility declaration.

(mail-abbrev-in-expansion-header-p): Declare as function.
This commit is contained in:
Glenn Morris 2007-12-09 02:10:05 +00:00
parent 88bfa2e405
commit b43906b677

View file

@ -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