X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmesscompat.el;h=153f76dda2f90a7533daa5ec2852eb893e2ce902;hb=5a3d773c46d46b7eb93e7a8203c4989af58ec96b;hp=337ab6f0118a44b37f295fb0b8bfd57fc406c279;hpb=0c19646ff2eeec5dac86287f76fc2dcb93fc73af;p=elisp%2Fgnus.git-

diff --git a/lisp/messcompat.el b/lisp/messcompat.el
index 337ab6f..153f76d 100644
--- a/lisp/messcompat.el
+++ b/lisp/messcompat.el
@@ -82,6 +82,11 @@ these lines.")
 (defvar message-send-hook mail-send-hook
   "Hook run before sending messages.")
 
+(defvar message-send-mail-function send-mail-function
+  "Function to call to send the current buffer as mail.
+The headers should be delimited by a line whose contents match the
+variable `mail-header-separator'.")
+
 (provide 'messcompat)
 
 ;;; messcompat.el ends here