diff options
| author | Øyvind Stegard | 2017-01-27 01:02:23 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2017-01-27 01:02:23 +0100 |
| commit | 7416f008f03214e4be6d3fac7de80ee82d041611 (patch) | |
| tree | 97773ab2cbced0165dde5e84dbe8c2961ea6c105 | |
| parent | 110cd0b439101a15f0fbc9fb86bf22b77f8ec260 (diff) | |
| download | emacs-7416f008f03214e4be6d3fac7de80ee82d041611.tar.gz emacs-7416f008f03214e4be6d3fac7de80ee82d041611.zip | |
Subject: Restore correct Gnus newsgroup name after sending message
* lisp/gnus/gnus-msg.el (gnus-msg-mail): Set the value of
gnus-newsgroup-name in the correct buffer (bug#24329).
Copyright-paperwork-exempt: yes
| -rw-r--r-- | lisp/gnus/gnus-msg.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index e56f50cdad1..a193ab41348 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el | |||
| @@ -546,7 +546,8 @@ instead." | |||
| 546 | (gnus-setup-message 'message | 546 | (gnus-setup-message 'message |
| 547 | (message-mail to subject other-headers continue | 547 | (message-mail to subject other-headers continue |
| 548 | nil yank-action send-actions return-action))) | 548 | nil yank-action send-actions return-action))) |
| 549 | (setq gnus-newsgroup-name group-name)) | 549 | (with-current-buffer buf |
| 550 | (setq gnus-newsgroup-name group-name))) | ||
| 550 | (when switch-action | 551 | (when switch-action |
| 551 | (setq mail-buf (current-buffer)) | 552 | (setq mail-buf (current-buffer)) |
| 552 | (switch-to-buffer buf) | 553 | (switch-to-buffer buf) |