X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-show.el;h=6e03f1e7820fa209e309b76b0047c389617d6816;hb=4387112de00d27e6957ca2b6a268242f0bb5c756;hp=aabe56e242018068ee4c4483ac6cc406a0a5b5d3;hpb=0b94dd7fd3dcd071ebbe498cd80f5fd687a78e08;p=notmuch diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index aabe56e2..6e03f1e7 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -1792,11 +1792,12 @@ to show, nil otherwise." (notmuch-show-message-adjust)) (defun notmuch-show-view-raw-message () - "View the file holding the current message." + "View the original source of the current message." (interactive) (let* ((id (notmuch-show-get-message-id)) (buf (get-buffer-create (concat "*notmuch-raw-" id "*")))) - (call-process notmuch-command nil buf nil "show" "--format=raw" id) + (let ((coding-system-for-read 'no-conversion)) + (call-process notmuch-command nil buf nil "show" "--format=raw" id)) (switch-to-buffer buf) (goto-char (point-min)) (set-buffer-modified-p nil) @@ -1955,7 +1956,7 @@ buffer. If PREVIOUS is non-nil, move to the previous item in the search results instead." (interactive "P") (let ((parent-buffer notmuch-show-parent-buffer)) - (notmuch-kill-this-buffer) + (notmuch-bury-or-kill-this-buffer) (when (buffer-live-p parent-buffer) (switch-to-buffer parent-buffer) (and (if previous