[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/mail pmailedit.el
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] emacs/lisp/mail pmailedit.el |
Date: |
Tue, 23 Dec 2008 04:06:28 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Richard M. Stallman <rms> 08/12/23 04:06:28
Modified files:
lisp/mail : pmailedit.el
Log message:
(pmail-cease-edit): Put `>' before `From ' lines in message.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/pmailedit.el?cvsroot=emacs&r1=1.11&r2=1.12
Patches:
Index: pmailedit.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/mail/pmailedit.el,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -b -r1.11 -r1.12
--- pmailedit.el 23 Dec 2008 04:03:35 -0000 1.11
+++ pmailedit.el 23 Dec 2008 04:06:28 -0000 1.12
@@ -107,6 +107,12 @@
(save-excursion
(set-buffer pmail-summary-buffer)
(pmail-summary-enable)))
+ ;; Disguise any "From " lines so they don't start a new message.
+ (save-excursion
+ (goto-char (point-min))
+ (while (search-forward "\nFrom " nil t)
+ (beginning-of-line)
+ (insert ">")))
;; Make sure buffer ends with a blank line
;; so as not to run this message together with the following one.
(save-excursion
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Chong Yidong, 2008/12/04
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Chong Yidong, 2008/12/04
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Chong Yidong, 2008/12/04
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Richard M. Stallman, 2008/12/22
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Richard M. Stallman, 2008/12/22
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Richard M. Stallman, 2008/12/22
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Richard M. Stallman, 2008/12/22
- [Emacs-diffs] emacs/lisp/mail pmailedit.el,
Richard M. Stallman <=
- [Emacs-diffs] emacs/lisp/mail pmailedit.el, Richard M. Stallman, 2008/12/29