home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / emacs / 3604 < prev    next >
Encoding:
Text File  |  1992-11-23  |  2.1 KB  |  57 lines
  1. Newsgroups: comp.emacs
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!rpi!ghost.dsi.unimi.it!newsserver.di.unipi.it!newsserver.di.unipi.it!campo
  3. From: campo@sunthpi3.difi.unipi.it (Massimo Campostrini)
  4. Subject: Re: Emacs & mail
  5. In-Reply-To: oshins@wolf.cs.washington.edu's message of 21 Nov 92 21: 21:52 GMT
  6. Message-ID: <CAMPO.92Nov23143809@sunthpi3.difi.unipi.it>
  7. Sender: netnews@di.unipi.it (USENET News System)
  8. Nntp-Posting-Host: sunthpi3.difi.unipi.it
  9. Organization: Istituto Nazionale di Fisica Nucleare
  10. References: <1992Nov20.164126.17154@lynx.dac.northeastern.edu>
  11.     <OSHINS.92Nov21132152@wolf.cs.washington.edu>
  12. Date: Mon, 23 Nov 1992 19:38:09 GMT
  13. Lines: 42
  14.  
  15. In article <OSHINS.92Nov21132152@wolf.cs.washington.edu> oshins@wolf.cs.washington.edu (Jake Oshins) writes:
  16.  
  17. >>    Is there any way to use emacs to reply to e-mail and include the previous
  18. >>    message?  Want i really want is emacs to insert some type of marker, such
  19. >>    as the `>` before every line of the previous message.  I know that elm 
  20. >>    does this but i don't have access to it anymore.
  21. >>
  22. >>    thanks
  23. >>
  24. >>    bert
  25. >
  26. >    If you reply to a message using Emacs, you can include the original
  27. >  message by typing C-c C-y, which is bound to mail-yank-original.  This
  28. >  puts four spaces in front of every line instead of a '>'.  But you can
  29. >  get rid of this by using C-u C-c C-y.
  30. >    If anyone knows of a way to change this to a '>' I would be
  31. >  interested.
  32. >
  33. >  Jake Oshins
  34.  
  35. You can put the following in your .emacs :
  36.  
  37. (defun new-rmail-reply (recipients-too)
  38.   "Reply to the sender of the current message.
  39. Prefix argument means CC: all other recipients of original message."
  40.   (interactive "P")
  41.   (rmail-reply (not recipients-too))
  42.   (mail-yank-original 0)
  43.   (goto-char 1)
  44.   (re-search-forward mail-header-separator nil t)
  45.   (replace-regexp "^" "> ")
  46. )
  47. ;; bind new-rmail-reply to `z'
  48. (setq rmail-mode-hook
  49.       '(lambda ()
  50.     (define-key rmail-mode-map "z" 'new-rmail-reply))
  51. )
  52. --
  53.         Massimo Campostrini
  54. Istituto Nazionale di Fisica Nucleare, Sezione di Pisa,
  55. Piazza Torricelli 2, I-56126 Pisa, Italy  ||  Phone: (+39)(50)42093
  56. Internet: campo@sunthpi3.difi.unipi.it    ||  Fax:   (+39)(50)48277
  57.