;ELC   
;;; Compiled by pot@pot.cnuce.cnr.it on Tue Mar 18 15:44:55 2003
;;; from file /home/pot/gnu/emacs-pretest.new/lisp/gnus/messcompat.el
;;; in Emacs version 21.3
;;; with bytecomp version 2.85.4.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`messcompat.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'sendmail)
#@371 *Specifies how "From" headers look.

If `nil', they contain just the return address like:
	king@grassland.com
If `parens', they look like:
	king@grassland.com (Elvis Parsley)
If `angles', they look like:
	Elvis Parsley <king@grassland.com>

Otherwise, most addresses look like `angles', but they look like
`parens' if `angles' would need quoting and `parens' would not.
(defvar message-from-style mail-from-style (#$ . -648))
#@126 Non-nil means when sending a message wait for and display errors.
nil means let mailer mail back a message to report errors.
(defvar message-interactive mail-interactive (#$ . 1081))
#@112 Normal hook, run each time a new outgoing message is initialized.
The function `message-setup' runs this hook.
(defvar message-setup-hook mail-setup-hook (#$ . 1271))
(byte-code "\303\301!\203 \302B\304\302\305\306#\210\303\302!\204 	\303\207" [current-load-list mail-mode-hook message-mode-hook boundp put variable-documentation "Hook run in message mode buffers."] 4)
#@123 *Number of spaces to insert at the beginning of each cited line.
Used by `message-yank-original' via `message-yank-cite'.
(defvar message-indentation-spaces mail-indentation-spaces (#$ . -1653))
#@248 *String to be inserted at the end of the message buffer.
If t, the `message-signature-file' file will be inserted instead.
If a function, the result from the function will be used instead.
If a form, the result from the form will be used instead.
(defvar message-signature mail-signature (#$ . -1855))
#@66 *File containing the text inserted at end of the message buffer.
(defvar message-signature-file mail-signature-file (#$ . -2163))
#@155 *A string containing header lines to be inserted in outgoing messages.
It is inserted before you edit the message, so you can edit or delete
these lines.
(defvar message-default-headers mail-default-headers (#$ . -2300))
#@35 Hook run before sending messages.
(defvar message-send-hook mail-send-hook (#$ . 2527))
#@155 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'.
(defvar message-send-mail-function send-mail-function (#$ . 2622))
(provide 'messcompat)