Gecko [ 122.154.134.11 ]

Name	Size	Permission
binhex.elc	9.01 KB	-rw-r--r--
blessmail.el	2.51 KB	-rw-r--r--
emacsbug.elc	7.55 KB	-rw-r--r--
feedmail.elc	79.59 KB	-rw-r--r--
footnote.elc	21.09 KB	-rw-r--r--
hashcash.elc	10.81 KB	-rw-r--r--
mail-extr.elc	33.9 KB	-rw-r--r--
mail-hist.elc	13.74 KB	-rw-r--r--
mail-utils.elc	9.55 KB	-rw-r--r--
mailabbrev.elc	13.96 KB	-rw-r--r--
mailalias.elc	13.52 KB	-rw-r--r--
mailclient.elc	3.56 KB	-rw-r--r--
mailheader.elc	5.92 KB	-rw-r--r--
mailpost.elc	2.3 KB	-rw-r--r--
metamail.elc	4.44 KB	-rw-r--r--
mspools.elc	7.25 KB	-rw-r--r--
reporter.elc	9.65 KB	-rw-r--r--
rfc2368.elc	2.46 KB	-rw-r--r--
rfc822.elc	5.71 KB	-rw-r--r--
rmail-spam-filter.elc	13.24 KB	-rw-r--r--
rmail.elc	113.93 KB	-rw-r--r--
rmailedit.elc	8.83 KB	-rw-r--r--
rmailkwd.elc	5.12 KB	-rw-r--r--
rmailmm.elc	11.05 KB	-rw-r--r--
rmailmsc.elc	1.56 KB	-rw-r--r--
rmailout.elc	15.73 KB	-rw-r--r--
rmailsort.elc	6.33 KB	-rw-r--r--
rmailsum.elc	52.51 KB	-rw-r--r--
sendmail.elc	51.72 KB	-rw-r--r--
smtpmail.elc	21.58 KB	-rw-r--r--
supercite.elc	58.99 KB	-rw-r--r--
uce.elc	7.66 KB	-rw-r--r--
undigest.elc	7.88 KB	-rw-r--r--
unrmail.elc	4.69 KB	-rw-r--r--
uudecode.elc	6.19 KB	-rw-r--r--

Code Editor : metamail.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:22 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/mail/metamail.el
;;; in Emacs version 23.1.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 "`metamail.el' was compiled for Emacs 19.29 or later"))

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

(custom-declare-group 'metamail nil "Metamail interface for Emacs." :group 'mail :group 'hypermedia :group 'processes)
#@25 *Metamail program name.
(custom-declare-variable 'metamail-program-name '"metamail" '(#$ . -731) :type 'string :group 'metamail)
#@53 *Mailer name set to MM_MAILER environment variable.
(custom-declare-variable 'metamail-mailer-name '"emacs" '(#$ . -866) :type 'string :group 'metamail)
#@240 *Environment variables passed to `metamail'.
It must be a list of strings that have the format ENVVARNAME=VALUE.
It is not expected to be altered globally by `set' or `setq'.
Instead, change its value temporary using `let' or `let*' form.
(defvar metamail-environment '("KEYHEADS=*" "MM_QUIET=1") (#$ . -1026))
#@288 *Switches for `metamail' program.
`-z' is required to remove zap file.
It is not expected to be altered globally by `set' or `setq'.
Instead, change its value temporary using `let' or `let*' form.
`-m MAILER' argument is automatically generated from the
`metamail-mailer-name' variable.
(custom-declare-variable 'metamail-switches ''("-x" "-d" "-z") '(#$ . -1344) :type '(repeat (string :tag "Switch")) :group 'metamail)
#@103 Interpret a header part of a MIME message in current buffer.
Its body part is not interpreted at all.
(defalias 'metamail-interpret-header #[nil "\212\303\304	\305\"eb\210\306\307\303\310#\210\311c\210`\312e\n\303\211\313%\210eb\210\306\314\303\315#\205,�\316\317!,\207" [buffer-read-only metamail-switches end nil append ("-c" "text/plain" "-E" "7bit") search-forward "\n\n" move "\n" metamail-region nodisplay "\n\n\n" t delete-char -1] 6 (#$ . 1772) nil])
#@303 Interpret a body part of a MIME message in current buffer.
Optional argument VIEWMODE specifies the value of the
EMACS_VIEW_MODE environment variable (defaulted to 1).
Optional argument NODISPLAY non-nil means buffer is not
redisplayed as output is inserted.
Its header part is not interpreted at all.
(defalias 'metamail-interpret-body #[(&optional viewmode nodisplay) "\212\306\211eb\210\307\310\306\311#\210`\214e}\210\312\313!\206�\314\312\315!\206$�\316)\317\320\321\n\322	\257\"\323d\f\306
%-\207" [end encoding contype metamail-switches viewmode nodisplay nil search-forward "\n\n" t mail-fetch-field "Content-Type" "text/plain" "Content-Transfer-Encoding" "7bit" append "-b" "-c" "-E" metamail-region] 7 (#$ . 2241) "p"])
#@322 Process current buffer through `metamail'.
Optional argument VIEWMODE specifies the value of the
EMACS_VIEW_MODE environment variable (defaulted to 1).
Optional argument BUFFER specifies a buffer to be filled (nil
means current).
Optional argument NODISPLAY non-nil means buffer is not
redisplayed as output is inserted.
(defalias 'metamail-buffer #[(&optional viewmode buffer nodisplay) "\303ed	\n%\207" [viewmode buffer nodisplay metamail-region] 6 (#$ . 2989) "p"])
#@322 Process current region through 'metamail'.
Optional argument VIEWMODE specifies the value of the
EMACS_VIEW_MODE environment variable (defaulted to 1).
Optional argument BUFFER specifies a buffer to be filled (nil
means current).
Optional argument NODISPLAY non-nil means buffer is not
redisplayed as output is inserted.
(defalias 'metamail-region #[(beg end &optional viewmode buffer nodisplay) "p\306\307\310!\311\312\247\203�\202�\313\"C\212\306\314\n\306\315%\210)\203.�q\210\306\fp=\203?�|\210\202C�ed|\210\316	#\317\320\321\306\322?\316 \323!\206b�\324D\nC#&\210*\325\326\327\217-\207" [viewmode option-environment metafile buffer-read-only curbuf selective-display nil make-temp-file "metamail" format "EMACS_VIEW_MODE=%d" 1 write-region nomessage append undecided apply call-process t "-m" "emacs" error (delete-file metafile) ((error)) beg end buffer process-environment metamail-environment coding-system-for-read metamail-program-name nodisplay metamail-switches metamail-mailer-name] 10 (#$ . 3466) "r\np"])
(provide 'metamail)

${this.title}

Code Editor : metamail.elc