From 7bc404f0a409a3ddae4178245445ffa922c4c544 Mon Sep 17 00:00:00 2001 From: Mark Walters Date: Sun, 9 Jun 2013 09:41:48 +0100 Subject: [PATCH] emacs: show: change emacs interactive pipe message. Previously the query string for piping a message to a command was "Pipe message to command: " regardless of whether the function was called with a prefix argument (which pipes all open messages to the command). This patch modifies the `interactive' command to reflect this. --- emacs/notmuch-show.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index d030ea3f..384f879b 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -1751,7 +1751,10 @@ to stdout or stderr will appear in the *notmuch-pipe* buffer. When invoked with a prefix argument, the command will receive all open messages in the current thread (formatted as an mbox) rather than only the current message." - (interactive "P\nsPipe message to command: ") + (interactive (let ((query-string (if current-prefix-arg + "Pipe all open messages to command: " + "Pipe message to command: "))) + (list current-prefix-arg (read-string query-string)))) (let (shell-command) (if entire-thread (setq shell-command