diff options
Diffstat (limited to 'lisp/mail/reporter.el')
| -rw-r--r-- | lisp/mail/reporter.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/mail/reporter.el b/lisp/mail/reporter.el index 45700d4d60d..6c5448aca83 100644 --- a/lisp/mail/reporter.el +++ b/lisp/mail/reporter.el @@ -332,12 +332,11 @@ mail-sending package is used for editing and sending the message." hookvar) ;; do the work (require 'sendmail) + ;; Just in case the original buffer is not visible now, bring it + ;; back somewhere + (display-buffer reporter-eval-buffer) ;; If mailbuf did not get made visible before, make it visible now. - (let (same-window-buffer-names same-window-regexps) - (pop-to-buffer mailbuf) - ;; Just in case the original buffer is not visible now, bring it - ;; back somewhere - (and pop-up-windows (display-buffer reporter-eval-buffer))) + (pop-to-buffer mailbuf) (goto-char (point-min)) (mail-position-on-field "to") (insert address) |