X-Git-Url: https://git.cworth.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-show.el;h=489e32c8bcafc1a9a3ef467ff45c8f098884f83d;hb=59c994e770581acb8effde7057d09823e1194830;hp=24db4c70aac6ebb9c4b73a5f12dd74e784bf8058;hpb=0c4dea4e48c4b8c7f9e7a4a19e983b3c0ca81be3;p=obsolete%2Fnotmuch-old

diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 24db4c70..489e32c8 100644
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -203,9 +203,10 @@ For example, if you wanted to remove an \"unread\" tag and add a
      (let ((id (notmuch-show-get-message-id)))
        (let ((buf (generate-new-buffer (concat "*notmuch-msg-" id "*"))))
          (with-current-buffer buf
-	    (call-process notmuch-command nil t nil "show" "--format=raw" id)
-           ,@body)
-	 (kill-buffer buf)))))
+	   (let ((coding-system-for-read 'no-conversion))
+	     (call-process notmuch-command nil t nil "show" "--format=raw" id)
+	     ,@body)
+	   (kill-buffer buf))))))
 
 (defun notmuch-show-turn-on-visual-line-mode ()
   "Enable Visual Line mode."