| Current Path : /usr/share/emacs/24.3/lisp/obsolete/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/obsolete/mailpost.elc |
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:09:08 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/obsolete/mailpost.el
;;; in Emacs version 24.3.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\300\302!\207" [require mailalias sendmail] 2)
#@130 The MH -post interface for `rmail-mail' to call.
To use it, include "(setq send-mail-function 'post-mail-send-it)" in
site-init.
(defalias 'post-mail-send-it #[nil "\203\n \306\307!\202 \310\311\306\312!\311\211p 6\313\216r\fq\210\314 \210\315 !\210db\210h\316U\2042 \316c\210\317 \210\320 7\203B \321e\n\"\210eb\210\322\323\n\324#\203Z `\nW\203Z \325\326!\210\202E \324eb\210\322\327\n\324#\203k \330\n!\210eb\210\322\331\n\324#\203\215 \212eb\210\322\332\n\324#)\204\215 \333y\210\334\335 \326\261\210eb\210\322\336\n\324#\203\234 \325\337!\210\203\251 r6q\210\314 \210))\340 8\341\216\342\343!\210\344\345!*\346\347\350\351\352!\203\307 *\202\310 \353\3116\311\354\355\257\203\330 \356\202\331 \357
C#\"\210\205r6q\210eb\210\322\360\311\324#\203\371 \325\361!\210\202\352 \362\363 !?\205\364\365ed{\").\207" [mail-interactive mailbuf delimline case-fold-search tembuf temfile generate-new-buffer " post-mail errors" 0 nil " post-mail temp" ((byte-code "\302!\210\303 !\203 \304 !\210\302\207" [tembuf errbuf kill-buffer bufferp switch-to-buffer] 2)) erase-buffer insert-buffer-substring 10 mail-sendmail-undelimit-header point-marker expand-mail-aliases re-search-forward "\n\n\n*" t replace-match "\n" "^FCC:" mail-do-fcc "^From:" "^Sender:" 1 "Sender: " user-login-name "^Subject:[ ]*\n" "" default-file-modes ((set-default-file-modes m)) set-default-file-modes 384 make-temp-file ",rpost" apply call-process append boundp post-mail-program "/usr/uci/lib/mh/post" "-nofilter" "-msgid" ("-watch") ("-nowatch") "\n\n* *" "; " zerop buffer-size error "Sending...failed to %s" errbuf mail-aliases m] 9 (#$ . 633)])
(provide 'mailpost)