[comp.emacs] Adding `Re:' to replies

jgk@osc.COM (Joe Keane) (06/27/90)

For some reason RMAIL doesn't prefix `Re:' to the subject when you're replying
to a message.  I don't know if it's generally desirable, but if you do want
that behavior here is a patch to get it.

*** /osc/arch/gnu/lisp/rmail.el	Tue May 16 14:54:22 1989
--- /home/rd/jgk/elisp/rmail.el	Tue Jun 26 17:21:35 1990
***************
*** 1206,1213 ****
  				(mail-fetch-field "resent-message-id" t))
  			       ((mail-fetch-field "message-id"))))))
      (and subject
! 	 (string-match "\\`Re: " subject)
! 	 (setq subject (substring subject 4)))
      (mail-other-window nil
        (mail-strip-quoted-names reply-to)
        subject
--- 1206,1214 ----
  				(mail-fetch-field "resent-message-id" t))
  			       ((mail-fetch-field "message-id"))))))
      (and subject
!       (progn
! 	(string-match "^\\([\t ]\\|[Rr]e:\\|[Ff]wd:\\)*" subject)
! 	(setq subject (concat "Re: " (substring subject (match-end 0))))))
      (mail-other-window nil
        (mail-strip-quoted-names reply-to)
        subject