emacs: Eliminate warning of calling function with excess arguments.

Yet another case of "how could this have possibly worked before?!".

I guess we were just getting very lucky with the emacs lisp calling
conventions and what happens with extra arguments, but, ick! Much
better now.
This commit is contained in:
Carl Worth 2010-10-27 18:04:38 -07:00
parent 75f703e7c2
commit c9e0da3a1a

View file

@ -796,9 +796,12 @@ The optional parameters are used as follows:
(goto-char (point-min))
(save-excursion
(let ((proc (start-process-shell-command
"notmuch-search" buffer notmuch-command "search"
(if oldest-first "--sort=oldest-first" "--sort=newest-first")
(shell-quote-argument query))))
"notmuch-search" buffer
(concat notmuch-command " search "
(if oldest-first
"--sort=oldest-first "
"--sort=newest-first ")
(shell-quote-argument query)))))
(set-process-sentinel proc 'notmuch-search-process-sentinel)
(set-process-filter proc 'notmuch-search-process-filter))))
(run-hooks 'notmuch-search-hook)))