Article View: gnu.emacs.help
Article #189292Re: remail in Rmail mode
From: Piet van Oostrum
Date: Wed, 20 Mar 1991 11:04
Date: Wed, 20 Mar 1991 11:04
24 lines
1547 bytes
1547 bytes
>>>>> faunt@CISCO.COM (Doug Faunt N6TQS 415-688-8269) (DF) writes:
DF> Has anyone implemented a remail command for Rmail mode?
I have one for VM, but it still had the code for rmail in it:
(defun remail ()
(interactive)
(let ((cur-buf (current-buffer)))
(mail-other-window)
; (vm-mail)
(erase-buffer)
(insert-buffer cur-buf)
(if (re-search-forward "^ *$" nil 1)
(replace-match mail-header-separator)
(insert mail-header-separator "\n"))
(if (and mail-archive-file-name (not (mail-position-on-field "FCC")))
(insert mail-archive-file-name))))
--
Piet* van Oostrum, Dept of Computer Science, Utrecht University,
Padualaan 14, P.O. Box 80.089, 3508 TB Utrecht, The Netherlands.
Telephone: +31 30 531806 Uucp: uunet!mcsun!ruuinf!piet
Telefax: +31 30 513791 Internet: piet@cs.ruu.nl (*`Pete')
Technical Details
Message-ID:
<1991Mar20.110453.12859@cs.ruu.nl>Path:
arc1-ca.pugleaf.net!gmdzi!unido!mcsun!hp4nl!alchemy!pietReferences:
<9103190014.AA04315@life.ai.mit.edu>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103b8b,456cc8ad2ee5ec3f X-Google-Attributes: gid103b8b,public X-Google-ArrivalTime: 1991-03-20 08:35:30 PST Path: arc1-ca.pugleaf.net!gmdzi!unido!mcsun!hp4nl!alchemy!piet From: piet@cs.ruu.nl (Piet van Oostrum) Newsgroups: gnu.emacs.help Subject: Re: remail in Rmail mode Message-ID: <1991Mar20.110453.12859@cs.ruu.nl> Date: 20 Mar 91 11:04:53 GMT References: <9103190014.AA04315@life.ai.mit.edu> Sender: piet@cs.ruu.nl (Piet van Oostrum) Reply-To: piet@cs.ruu.nl (Piet van Oostrum) Organization: Dept of Computer Science, Utrecht University, The Netherlands Lines: 24 In-Reply-To: faunt@CISCO.COM (Doug Faunt N6TQS 415-688-8269)