diff options
| author | Chong Yidong | 2012-04-16 18:11:45 +0800 |
|---|---|---|
| committer | Chong Yidong | 2012-04-16 18:11:45 +0800 |
| commit | 4fc2c72a6fa8b776b6c7aaa42e80cea77b99ad0f (patch) | |
| tree | 083abf7b7664f63ad45ceb77817b9a080d7efadc /lisp/mail | |
| parent | 4f5d565ff35cd843ffed06e02e4c5642433124cb (diff) | |
| download | emacs-4fc2c72a6fa8b776b6c7aaa42e80cea77b99ad0f.tar.gz emacs-4fc2c72a6fa8b776b6c7aaa42e80cea77b99ad0f.zip | |
* mail/sendmail.el (mail-bury): Call return action with the right Rmail buffer.
Fixes: debbugs:11242
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/sendmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 933eaef8119..c4647d7893e 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el | |||
| @@ -864,7 +864,7 @@ Prefix arg means don't delete this window." | |||
| 864 | (unless return-action | 864 | (unless return-action |
| 865 | (dolist (buffer (buffer-list)) | 865 | (dolist (buffer (buffer-list)) |
| 866 | (if (eq (buffer-local-value 'major-mode buffer) 'rmail-mode) | 866 | (if (eq (buffer-local-value 'major-mode buffer) 'rmail-mode) |
| 867 | (setq return-action `(rmail-mail-return ,newbuf))))) | 867 | (setq return-action `(rmail-mail-return ,buffer))))) |
| 868 | (if (and (null arg) return-action) | 868 | (if (and (null arg) return-action) |
| 869 | (apply (car return-action) (cdr return-action)) | 869 | (apply (car return-action) (cdr return-action)) |
| 870 | (switch-to-buffer newbuf)))) | 870 | (switch-to-buffer newbuf)))) |