+2013-03-18 Sam Steingold <sds@gnu.org>
+
+ * message.el (message-bury): Minor cleanup.
+
2013-03-07 Paul Eggert <eggert@cs.ucla.edu>
* gnus-cite.el: Specify utf-8, not iso-8859-1, for ASCII file.
(defun message-bury (buffer)
"Bury this mail BUFFER."
- (if message-return-action
- (progn
- (bury-buffer buffer)
- (apply (car message-return-action) (cdr message-return-action)))
- (with-current-buffer buffer (bury-buffer))))
+ (bury-buffer buffer)
+ (when message-return-action
+ (apply (car message-return-action) (cdr message-return-action))))
(defun message-send (&optional arg)
"Send the message in the current buffer.