summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
authorRichard Ryniker <ryniker@alum.mit.edu>2015-03-30 17:38:25 +0200
committerMartin Rudalics <rudalics@gmx.at>2015-03-30 17:38:25 +0200
commitd9eff02736c975dc5035e02249ff17c8a068d203 (patch)
tree1dfd01b2fa10f31ed683a4675b9df1630314d9dc /lisp/mail
parentd16fb740912bf4874e7087f6f419427516047977 (diff)
downloademacs-d9eff02736c975dc5035e02249ff17c8a068d203.tar.gz
In sendmail-send-it don't switch to non-existent buffer. (Bug#20211)
* mail/sendmail.el (sendmail-send-it): Do not attempt to switch to non-existent buffer (errbuf is not created when customization variable mail-interactive is nil). (Bug#20211)
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/sendmail.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 7e9bd5bca2f..9fa7aa5a6f2 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -1299,10 +1299,10 @@ external program defined by `sendmail-program'."
(error "Sending...failed to %s"
(buffer-substring (point-min) (point-max)))))))
(kill-buffer tembuf)
- (if (and (bufferp errbuf)
- (not error))
- (kill-buffer errbuf)
- (switch-to-buffer-other-window errbuf)))))
+ (when (buffer-live-p errbuf)
+ (if error
+ (switch-to-buffer-other-window errbuf)
+ (kill-buffer errbuf))))))
(autoload 'rmail-output-to-rmail-buffer "rmailout")