notmuch.el: Avoid calling next/previous-line non-interactively.

Emacs always complains if we use these from lisp code.

diff --git a/notmuch.el b/notmuch.el
index 118c0ee7b6e816ff7c5bb44eff12987468ddb127..28ef5c6b4e8af4729db502a83a2fa0ddb717737e 100644 (file)
--- a/notmuch.el
+++ b/notmuch.el
@@ -158,7 +158,7 @@ Unlike builtin `next-line' this version accepts no arguments."
 
 By advancing forward until reaching a visible character.
 
 
 By advancing forward until reaching a visible character.
 

-Unlike builtin `next-line' this version accepts no arguments."
+Unlike builtin `previous-line' this version accepts no arguments."

   (interactive)
   (set 'this-command 'previous-line)
   (call-interactively 'previous-line)
   (interactive)
   (set 'this-command 'previous-line)
   (call-interactively 'previous-line)


@@ -1007,12 +1007,12 @@ thread from that buffer can be show when done with this one)."
 (defun notmuch-search-next-thread ()
   "Select the next thread in the search results."
   (interactive)
 (defun notmuch-search-next-thread ()
   "Select the next thread in the search results."
   (interactive)

-  (next-line))
+  (forward-line 1))

 
 (defun notmuch-search-previous-thread ()
   "Select the previous thread in the search results."
   (interactive)
 
 (defun notmuch-search-previous-thread ()
   "Select the previous thread in the search results."
   (interactive)

-  (previous-line))
+  (forward-line -1))

 
 (defun notmuch-search-last-thread ()
   "Select the last thread in the search results."
 
 (defun notmuch-search-last-thread ()
   "Select the last thread in the search results."