[mew-int 00918] Re: Forwarding Inline

[Tatsuya Kinoshita]

In message [mew-int 00917], on 20 Jun 2002,
Charles Muller <acmuller at example.com> wrote:

> Alternatively, I could reply, delete all of the "<" , and change the
> message header.

The function is defined in my ~/.mew.el:

---- 
(define-key mew-draft-body-map "\C-cy" 'my-mew-draft-cite-without-prefix)
(defun my-mew-draft-cite-without-prefix (&optional arg force)
  "Copy and paste a part of message from Message mode without citation prefix."
  (interactive "P")
  (let ((mew-cite-prefix "")
	(mew-cite-strings-function (function mew-cite-strings))
	mew-cite-fields mew-cite-format
	mew-cite-prefix-function mew-draft-cite-fill-mode)
    (unless arg
      (setq mew-cite-fields '("Message-Id:" "Date:" "From:" "Subject:" "To:" "Cc:"))
      (setq mew-cite-format "Message-ID: %s\nDate: %s\nFrom: %s\nSubject: %s\nTo: %s\nCc: %s\n\n"))
    (save-excursion
      (insert "\n-------- \n")
      (mew-draft-cite arg force))))
---- 

-- 
Tatsuya Kinoshita