From ca5ae54cb1aa91dc2c3ba9372d70d6fa080851d8 Mon Sep 17 00:00:00 2001 From: Carl Worth Date: Mon, 26 Apr 2010 20:15:45 -0700 Subject: [PATCH] notmuch-hello: Fix ability to isearch to a saved-search and press RET After isearching for an entire saved-search name, the point will be immediately after that name in the buffer. Before commit c9ba61bebef7733c4bf12adf94222e57621fdcf6 the space right after the name was part of the widget so the user could press RET right after the isearch to activate the saved search. The above commit broke that functionality. Restore it by including a single space after each name as part of the widget. --- emacs/notmuch-hello.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 936d5466..5d601acf 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -168,14 +168,13 @@ diagonal." ;; (not elem) indicates an empty slot in the matrix. (when elem (widget-insert (format "%6s " (notmuch-folder-count (cdr elem)))) - (if (string= (car elem) target) - (progn - (setq found-target-pos (point-marker)))) + (if (string= (format "%s " (car elem)) target) + (setq found-target-pos (point-marker))) (widget-create 'push-button :notify #'notmuch-hello-widget-search :notmuch-search-terms (cdr elem) - (car elem)) - (insert (make-string (- widest (length (car elem))) ? ))) + (format "%s " (car elem))) + (insert (make-string (1- (- widest (length (car elem)))) ? ))) (setq count (1+ count)) (if (eq (% count tags-per-line) 0) (widget-insert "\n")))) -- 2.26.2