diff options
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 26 |
1 files changed, 15 insertions, 11 deletions
diff --git a/init.el b/init.el index 617de47..aed189c 100644 --- a/init.el +++ b/init.el | |||
@@ -166,12 +166,12 @@ | |||
166 | (setopt display-time-format " %H:%M" | 166 | (setopt display-time-format " %H:%M" |
167 | display-time-mail-function | 167 | display-time-mail-function |
168 | (defun +notmuch-new-mail-p () | 168 | (defun +notmuch-new-mail-p () |
169 | (plist-get (cl-find "inbox+unread" | 169 | (plist-get (cl-find "inbox+unread" |
170 | (ignore-errors | 170 | (ignore-errors |
171 | (notmuch-hello-query-counts notmuch-saved-searches)) | 171 | (notmuch-hello-query-counts notmuch-saved-searches)) |
172 | :key (lambda (l) (plist-get l :name)) | 172 | :key (lambda (l) (plist-get l :name)) |
173 | :test #'equal) | 173 | :test #'equal) |
174 | :count)) | 174 | :count)) |
175 | display-time-default-load-average nil) | 175 | display-time-default-load-average nil) |
176 | (display-time-mode)) | 176 | (display-time-mode)) |
177 | 177 | ||
@@ -728,9 +728,13 @@ With PREFIX, prompt to change the current dictionary." | |||
728 | 728 | ||
729 | (use-package tab-bar | 729 | (use-package tab-bar |
730 | :config | 730 | :config |
731 | (setopt tab-bar-show t | 731 | (setopt tab-bar-show t) |
732 | tab-bar-format | 732 | (add-to-list 'tab-bar-format 'tab-bar-format-menu-bar) |
733 | (append tab-bar-format | 733 | (add-to-list 'tab-bar-format 'tab-bar-format-align-right :append) |
734 | '(tab-bar-format-align-right | 734 | (add-to-list 'tab-bar-format 'tab-bar-format-global :append) |
735 | tab-bar-format-global))) | 735 | (with-eval-after-load 'notmuch |
736 | |||
737 | ;; (remove-hook 'notmuch-after-tag-hook #'tab-bar-make-keymap-1) | ||
738 | (define-advice notmuch-update-tags (:after (&rest _) update-tab-bar) | ||
739 | (tab-bar--update-tab-bar-lines))) | ||
736 | (tab-bar-mode)) | 740 | (tab-bar-mode)) |