From: David Bremner Date: Sun, 15 Jun 2025 20:12:35 +0000 (-0300) Subject: emacs/hello: fix one case of passing hide-excluded X-Git-Tag: 0.40_rc0~5 X-Git-Url: https://git.cworth.org/git?a=commitdiff_plain;h=97a2bad36a35399681f6c5f5a2b4390e6429d5ae;p=notmuch emacs/hello: fix one case of passing hide-excluded In the search box (and recent searches), notmuch-search-hide-excluded was not being passed to notmuch-search. This means that excluded messages were always shown in the results. Fix this by passing the extra argument. --- diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 67c805a8..eb5d618a 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -438,7 +438,7 @@ supported for \"Customized queries section\" items." (setq search (string-trim search)) (let ((history-delete-duplicates t)) (add-to-history 'notmuch-search-history search))) - (notmuch-search search notmuch-search-oldest-first))) + (notmuch-search search notmuch-search-oldest-first notmuch-search-hide-excluded))) (defun notmuch-hello-add-saved-search (widget &rest _event) (let ((search (widget-value (widget-get widget :parent))) diff --git a/test/T461-emacs-search-exclude.sh b/test/T461-emacs-search-exclude.sh index 5aa13370..338e1e4e 100755 --- a/test/T461-emacs-search-exclude.sh +++ b/test/T461-emacs-search-exclude.sh @@ -24,7 +24,6 @@ test_emacs '(notmuch-hello) test_expect_equal_file $EXPECTED/notmuch-search-tag-inbox-without-excluded OUTPUT test_begin_subtest "Search from search box doesn't contain excluded mail by default" -test_subtest_known_broken test_emacs '(notmuch-hello) (goto-char (point-min)) (re-search-forward "Search:") @@ -37,7 +36,6 @@ test_emacs '(notmuch-hello) test_expect_equal_file $EXPECTED/notmuch-search-tag-inbox-without-excluded OUTPUT test_begin_subtest "Search from search box doesn't contain excluded mail by default" -test_subtest_known_broken test_emacs '(notmuch-hello) (goto-char (point-min)) (re-search-forward "Search:")