From: Michal Sojka <sojkam1@fel.cvut.cz>
Date: Sat, 6 Nov 2010 23:09:18 +0000 (+0100)
Subject: emacs: Fix notmuch-show-pipe-message to use notmuch-command variable
X-Git-Tag: 0.5~60
X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=c7189ed607f2715d60133743bf616011796c7e14

emacs: Fix notmuch-show-pipe-message to use notmuch-command variable

Previously notmuch command name was hardcoded into this function,
which made remote use of pipe command impossible.
---

diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 3daa8685..ae483dde 100644
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -937,12 +937,13 @@ than only the current message."
   (let (shell-command)
     (if entire-thread
 	(setq shell-command 
-	      (concat "notmuch show --format=mbox "
+	      (concat notmuch-command " show --format=mbox "
 		      (shell-quote-argument
 		       (mapconcat 'identity (notmuch-show-get-message-ids-for-open-messages) " OR "))
 		      " | " command))
       (setq shell-command
-	    (concat "notmuch show --format=raw " (shell-quote-argument (notmuch-show-get-message-id)) " | " command)))
+	    (concat notmuch-command " show --format=raw "
+		    (shell-quote-argument (notmuch-show-get-message-id)) " | " command)))
     (start-process-shell-command "notmuch-pipe-command" "*notmuch-pipe*" shell-command)))
 
 (defun notmuch-show-add-tags-worker (current-tags add-tags)