;ELC ;;; compiled by kwzh@hal.gnu.ai.mit.edu on Mon Apr 17 19:54:24 1995 ;;; from file /gd/gnu/emacs/19.0/lisp/unrmail.el ;;; emacs version 19.28.90.26. ;;; 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 "`/gd/gnu/emacs/19.0/lisp/unrmail.el' was compiled for Emacs 19")) (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 (#$ . 550)]) #@62 Convert Rmail file FILE to system inbox format file TO-FILE. (defalias 'unrmail #[(file to-file) "ÀÁ‰Å!ˆÇÈ \"ˆ\f\nWƒ)Ë\fT‰!ˆÌ ÍÎ#ˆ‚ÇÏ \"+‡" [0 nil rmail-delete-after-output rmail-display-summary message-count rmail file message "Writing messages to %s..." to-file rmail-total-messages rmail-show-message rmail-output 1 t "Writing messages to %s...done"] 4 (#$ . 1068) "fUnrmail (rmail file): \nFUnrmail into (new mailbox file): "])