]> git.notmuchmail.org Git - notmuch/commitdiff
notmuch-hello: Fix ability to isearch to a saved-search and press RET
authorCarl Worth <cworth@cworth.org>
Tue, 27 Apr 2010 03:15:45 +0000 (20:15 -0700)
committerCarl Worth <cworth@cworth.org>
Tue, 27 Apr 2010 03:15:45 +0000 (20:15 -0700)
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

index 936d5466cad153c8462122b551ac353157d16c1e..5d601acf4da0aca87677005d7158a458075fb6fc 100644 (file)
@@ -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"))))