diff options
| author |  Carl Worth <cworth@cworth.org> | 2010-10-27 18:04:38 -0700 |
|---|---|---|
| committer | Carl Worth <cworth@cworth.org> | 2010-10-27 18:04:38 -0700 |
| commit | c9e0da3a1aaa640da330fe82fa906bb84463736b (patch) | |
| tree | 5318f31ace7f4dec2747170e4c5012b1026186e9 /emacs | |
| parent | 75f703e7c2fe33920342c1bc534d19935c1e3513 (diff) | |
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.
Diffstat (limited to 'emacs')
| -rw-r--r-- | emacs/notmuch.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/emacs/notmuch.el b/emacs/notmuch.el index ff9b519b..a8485275 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -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))) |