[notmuch] [PATCH 3/3] notmuch.el: Use emacs built-in forward-button and backward-button
Kan-Ru Chen
kanru at kanru.info
Mon Nov 30 22:13:53 PST 2009
There are built-ins, so why not use them?
Signed-off-by: Kan-Ru Chen <kanru at kanru.info>
---
notmuch.el | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/notmuch.el b/notmuch.el
index 5b8513c..4d08c83 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -547,12 +547,12 @@ which this thread was originally shown."
(defun notmuch-show-next-button ()
"Advance point to the next button in the buffer."
(interactive)
- (goto-char (button-start (next-button (point)))))
+ (forward-button 1))
(defun notmuch-show-previous-button ()
"Move point back to the previous button in the buffer."
(interactive)
- (goto-char (button-start (previous-button (point)))))
+ (backward-button 1))
(defun notmuch-toggle-invisible-action (cite-button)
(let ((invis-spec (button-get button 'invisibility-spec)))
--
1.6.5.3
More information about the notmuch
mailing list