emacs/tree: condition hl-line-mode on notmuch-hl-line

It isn't clear that this call to hl-line-mode will survive the coming
re-organization to stop relying on hooks, but incrementally this at
least makes the disabling behaviour consistent.
This commit is contained in:
David Bremner 2024-08-10 14:36:23 -03:00
parent 5cb06b1893
commit 43e90e7caa
2 changed files with 2 additions and 3 deletions

View file

@ -1091,7 +1091,8 @@ Complete list of currently available key bindings:
\\{notmuch-tree-mode-map}"
(setq notmuch-buffer-refresh-function #'notmuch-tree-refresh-view)
(hl-line-mode 1)
(when notmuch-hl-line
(hl-line-mode 1))
(setq buffer-read-only t)
(setq truncate-lines t)
(when notmuch-tree-outline-enabled (notmuch-tree-outline-mode 1)))

View file

@ -147,7 +147,6 @@ test_emacs_expect_t '(let ((notmuch-hl-line nil))
nil))'
test_begin_subtest "hl-line disabled, tree"
test_subtest_known_broken
test_emacs_expect_t '(let ((notmuch-hl-line nil))
(notmuch-tree "tag:inbox")
(notmuch-test-wait)
@ -156,7 +155,6 @@ test_emacs_expect_t '(let ((notmuch-hl-line nil))
nil))'
test_begin_subtest "hl-line disabled, unthreaded"
test_subtest_known_broken
test_emacs_expect_t '(let ((notmuch-hl-line nil))
(notmuch-unthreaded "tag:inbox")
(notmuch-test-wait)