summary refs log tree commit diff stats
path: root/init.el
diff options
context:
space:
mode:
Diffstat (limited to 'init.el')
-rw-r--r--init.el26
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))