;ELC   
;;; compiled by jimb@geech.gnu.ai.mit.edu on Mon Jul  5 23:32:57 1993
;;; from file /gd/gnu/emacs/19.0/lisp/mailpost.el
;;; emacs version 19.15.16.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "This file was compiled for Emacs 19"))

(byte-code "ÀÁ!ˆÀÂ!‡" [require mailalias sendmail] 2)
(defalias 'post-mail-send-it #[nil "ƒ\n ÁÂ!‚ ÃÄÁÅ!Æ‰p	\nÍŽŠ\nqˆÎ ˆÏ!ˆdbˆhÐU„9 ÐcˆebˆÑÒÒQ!ˆÔÕ!ˆÖ×!ˆØ ƒ[ Úe\"ˆebˆÛÜÝ#ƒu `Wƒu ÔÒ!ˆ‚^ Ý	ebˆÛÞÝ#ƒ‰ ß!ˆebˆÛàÝ#ƒ­ ŠebˆÛáÝ#)„­ ×yˆâã Ò±ˆebˆÛäÝ#ƒ½ Ôå!ˆƒÊ ŠqˆÎ ˆ))æç!‰!ˆèé\"ˆêëìíî!ƒé .‚ê ïÆÆðñ¯ƒú ò‚û óC#\"ˆ…+ŠqˆebˆÛôÆÝ#ƒÔõ!ˆ‚ö ÃU?…*÷øed{\").‡" [mail-interactive generate-new-buffer " post-mail errors" 0 "/tmp/,rpost" " post-mail temp" nil mailbuf delimline case-fold-search tembuf temfile errbuf ((byte-code "À	!ˆÂ!ƒ Ä!ˆÀ‡" [kill-buffer tembuf bufferp errbuf switch-to-buffer] 2)) erase-buffer insert-buffer-substring 10 search-forward "\n" mail-header-separator replace-match "\n\n" backward-char 1 point-marker mail-aliases expand-mail-aliases re-search-forward "\n\n\n*" t "^FCC:" mail-do-fcc "^From:" "^Sender:" "Sender: " user-login-name "^Subject:[ 	]*\n" "" write-file make-temp-name set-file-modes 384 apply call-process append boundp post-mail-program "/usr/uci/lib/mh/post" "-nofilter" "-msgid" ("-watch") ("-nowatch") "\n\n* *" "; " buffer-size error "Sending...failed to %s"] 9 "\
The MH -post interface for `rmail-mail' to call.
To use it, include \"(setq send-mail-function 'post-mail-send-it)\" in
site-init."])
