mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-25 04:18:08 +01:00
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.
This commit is contained in:
parent
d0bd88f06d
commit
7bc404f0a4
1 changed files with 4 additions and 1 deletions
|
@ -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
|
When invoked with a prefix argument, the command will receive all
|
||||||
open messages in the current thread (formatted as an mbox) rather
|
open messages in the current thread (formatted as an mbox) rather
|
||||||
than only the current message."
|
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)
|
(let (shell-command)
|
||||||
(if entire-thread
|
(if entire-thread
|
||||||
(setq shell-command
|
(setq shell-command
|
||||||
|
|
Loading…
Reference in a new issue