andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(mail): Ask a different question, if buffer is visiting a file.

Browse source
This commit is contained in:
Richard M. Stallman 1997-07-19 08:15:46 +00:00
parent 1b8def5857
commit 072c1ebbf4
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/mail/sendmail.el
View file

@ -1241,7 +1241,9 @@ The seventh argument ACTIONS is a list of actions to take
(let (initialized)
(and (not noerase)
(or (not (buffer-modified-p))
(y-or-n-p "Unsent message being composed; erase it? "))
(if buffer-file-name
(y-or-n-p "Buffer is modified; erase it and reinitialize? ")
(y-or-n-p "Unsent message being composed; erase it? ")))
(let ((inhibit-read-only t))
(erase-buffer)
(mail-setup to subject in-reply-to cc replybuffer actions)