debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-22 10:58:10 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: Define notmuch-search-process-filter-data before first use.

Browse source 
To avoid a wraning about a reference to a free variable when compiling.
This commit is contained in:
Carl Worth 2011-03-10 17:59:53 -08:00
parent 708c4f46ca
commit eead238277
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
emacs/notmuch.el
View file

@ -563,6 +563,10 @@ This function advances the next thread when finished."
(notmuch-search-remove-tag-thread "inbox") (notmuch-search-remove-tag-thread "inbox")
(forward-line)) (forward-line))
(defvar notmuch-search-process-filter-data nil
"Data that has not yet been processed.")
(make-variable-buffer-local 'notmuch-search-process-filter-data)
(defun notmuch-search-process-sentinel (proc msg) (defun notmuch-search-process-sentinel (proc msg)
"Add a message to let user know when \"notmuch search\" exits" "Add a message to let user know when \"notmuch search\" exits"
(let ((buffer (process-buffer proc)) (let ((buffer (process-buffer proc))
@ -738,10 +742,6 @@ non-authors is found, assume that all of the authors match."
do (notmuch-search-insert-field field date count authors subject tags))) do (notmuch-search-insert-field field date count authors subject tags)))
(insert "\n")) (insert "\n"))
(defvar notmuch-search-process-filter-data nil
"Data that has not yet been processed.")
(make-variable-buffer-local 'notmuch-search-process-filter-data)
(defun notmuch-search-process-filter (proc string) (defun notmuch-search-process-filter (proc string)
"Process and filter the output of \"notmuch search\"" "Process and filter the output of \"notmuch search\""
(let ((buffer (process-buffer proc)) (let ((buffer (process-buffer proc))