diff options
| author | Glenn Morris | 2014-01-09 15:04:39 -0500 |
|---|---|---|
| committer | Glenn Morris | 2014-01-09 15:04:39 -0500 |
| commit | e49c0a9ae3400d7e723ccacc6fb3f44e90d87a34 (patch) | |
| tree | 5d9dfa8ffd943975a0861ef2b3bc808e3e79d9da | |
| parent | 6affdccc5895a0e9650d74c93e0ef04a3e38d41f (diff) | |
| download | emacs-e49c0a9ae3400d7e723ccacc6fb3f44e90d87a34.tar.gz emacs-e49c0a9ae3400d7e723ccacc6fb3f44e90d87a34.zip | |
Comment
| -rw-r--r-- | lisp/gnus/message.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index f6830c13072..be19ccea38d 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el | |||
| @@ -4099,6 +4099,9 @@ Instead, just auto-save the buffer and then bury it." | |||
| 4099 | 4099 | ||
| 4100 | (defun message-bury (buffer) | 4100 | (defun message-bury (buffer) |
| 4101 | "Bury this mail BUFFER." | 4101 | "Bury this mail BUFFER." |
| 4102 | ;; Note that this is not quite the same as (bury-buffer buffer), | ||
| 4103 | ;; since bury-buffer does extra stuff with a nil argument. | ||
| 4104 | ;; Eg http://lists.gnu.org/archive/html/emacs-devel/2014-01/msg00539.html | ||
| 4102 | (with-current-buffer buffer (bury-buffer)) | 4105 | (with-current-buffer buffer (bury-buffer)) |
| 4103 | (if message-return-action | 4106 | (if message-return-action |
| 4104 | (apply (car message-return-action) (cdr message-return-action)))) | 4107 | (apply (car message-return-action) (cdr message-return-action)))) |