;ELC ;;; compiled by rms@mole.gnu.ai.mit.edu on Fri Jan 26 02:07:53 1996 ;;; from file /home/fsf/rms/e19/lisp/unrmail.el ;;; emacs version 19.30.90.1. ;;; 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.29"))) (error "`unrmail.el' was compiled for Emacs 19.29 or later")) (byte-code "À BÀ‡" [command-line-args-left current-load-list] 2) #@260 Convert Rmail files to system inbox format. Specify the input Rmail file names as command line arguments. For each Rmail file, the corresponding output file name is made by adding `.mail' at the end. For example, invoke `emacs -batch -f batch-unrmail RMAIL'. (defalias 'batch-unrmail #[nil "„ÁÂ!ˆÃ\fƒ\"Å\f@\f@ÆP\"„Ç\fA‰„ÈÉ!ˆÊ ƒ/Ë‚0Ì!)‡" [noninteractive error "`batch-unrmail' is to be used only with -batch" nil command-line-args-left unrmail ".mail" t message "Done" kill-emacs 1 0] 5 (#$ . 539)]) #@62 Convert Rmail file FILE to system inbox format file TO-FILE. (defalias 'unrmail #[(file to-file) "ÀÁ‰Å!ˆÇ \"ÊË\"ˆ\f\fWƒ4Í\fT‰!ˆÎ ˆÏÐÑ#ˆ‚ÊÒ\"+‡" [0 nil rmail-delete-after-output rmail-display-summary message-count rmail file expand-file-name to-file default-directory message "Writing messages to %s..." rmail-total-messages rmail-show-message rmail-toggle-header rmail-output 1 t "Writing messages to %s...done"] 4 (#$ . 1057) "fUnrmail (rmail file): \nFUnrmail into (new mailbox file): "])