Mercurial > emacs
changeset 3949:d95172e91f4e
(mail-send): Don't test buffer-modified-p if buffer is visiting a file.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 01 Jul 1993 23:35:51 +0000 |
| parents | 33d46b047130 |
| children | 6e13c3b03b67 |
| files | lisp/mail/sendmail.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/sendmail.el Thu Jul 01 22:13:28 1993 +0000 +++ b/lisp/mail/sendmail.el Thu Jul 01 23:35:51 1993 +0000 @@ -300,8 +300,10 @@ Otherwise any failure is reported in a message back to the user from the mailer." (interactive) - (if (or (buffer-modified-p) - (y-or-n-p "Message already sent; resend? ")) + (if (if buffer-file-name + (y-or-n-p "Send buffer contents as mail message? ") + (or (buffer-modified-p) + (y-or-n-p "Message already sent; resend? "))) (progn (message "Sending...") (run-hooks 'mail-send-hook)