aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard Ryniker2015-03-30 17:38:25 +0200
committerMartin Rudalics2015-03-30 17:38:25 +0200
commitd9eff02736c975dc5035e02249ff17c8a068d203 (patch)
tree1dfd01b2fa10f31ed683a4675b9df1630314d9dc
parentd16fb740912bf4874e7087f6f419427516047977 (diff)
downloademacs-d9eff02736c975dc5035e02249ff17c8a068d203.tar.gz
emacs-d9eff02736c975dc5035e02249ff17c8a068d203.zip
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)
-rw-r--r--lisp/ChangeLog6
-rw-r--r--lisp/mail/sendmail.el8
2 files changed, 10 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fd346f05afb..69d9ab9f977 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
12015-03-30 Richard Ryniker <ryniker@alum.mit.edu> (tiny change)
2
3 * mail/sendmail.el (sendmail-send-it): Do not attempt to switch
4 to non-existent buffer (errbuf is not created when customization
5 variable mail-interactive is nil). (Bug#20211)
6
12015-03-29 Stefan Monnier <monnier@iro.umontreal.ca> 72015-03-29 Stefan Monnier <monnier@iro.umontreal.ca>
2 8
3 * emacs-lisp/smie.el (smie-backward-sexp-command) 9 * emacs-lisp/smie.el (smie-backward-sexp-command)
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'."
1299 (error "Sending...failed to %s" 1299 (error "Sending...failed to %s"
1300 (buffer-substring (point-min) (point-max))))))) 1300 (buffer-substring (point-min) (point-max)))))))
1301 (kill-buffer tembuf) 1301 (kill-buffer tembuf)
1302 (if (and (bufferp errbuf) 1302 (when (buffer-live-p errbuf)
1303 (not error)) 1303 (if error
1304 (kill-buffer errbuf) 1304 (switch-to-buffer-other-window errbuf)
1305 (switch-to-buffer-other-window errbuf))))) 1305 (kill-buffer errbuf))))))
1306 1306
1307(autoload 'rmail-output-to-rmail-buffer "rmailout") 1307(autoload 'rmail-output-to-rmail-buffer "rmailout")
1308 1308