Mercurial > emacs
changeset 5097:a0a5b39e3d22
(mail-yank-original): Delete windows on selected frame only.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 21 Nov 1993 22:18:15 +0000 |
parents | 76f878905c65 |
children | a770e7708711 |
files | lisp/mail/sendmail.el |
diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/sendmail.el Sun Nov 21 22:15:04 1993 +0000 +++ b/lisp/mail/sendmail.el Sun Nov 21 22:18:15 1993 +0000 @@ -670,7 +670,10 @@ (interactive "P") (if mail-reply-buffer (let ((start (point))) - (delete-windows-on mail-reply-buffer) + ;; If the original message is in another window in the same frame, + ;; delete that window to save screen space. + ;; t means don't alter other frames. + (delete-windows-on mail-reply-buffer t) (insert-buffer mail-reply-buffer) (if (consp arg) nil