From bcbbf228f001db8e92736c21594dac064d4fbd45 Mon Sep 17 00:00:00 2001 From: bard Date: Mon, 29 Jan 2024 04:54:42 -0500 Subject: trim eglot/notmuch --- bard-elisp/bard-modeline.el | 21 --------------------- 1 file changed, 21 deletions(-) (limited to 'bard-elisp') diff --git a/bard-elisp/bard-modeline.el b/bard-elisp/bard-modeline.el index 57855d0..53b0539 100644 --- a/bard-elisp/bard-modeline.el +++ b/bard-elisp/bard-modeline.el @@ -513,29 +513,8 @@ TYPE is usually keyword `:error', `:warning' or `:note'." "Mode line construct displaying `flymake-mode-line-format'. Specific to the current window's mode line.") -;;;; Eglot - -(with-eval-after-load 'eglot - (setq mode-line-misc-info - (delete '(eglot--managed-mode (" [" eglot--mode-line-format "] ")) mode-line-misc-info))) - -(defvar-local prot-modeline-eglot - `(:eval - (when (and (featurep 'eglot) (mode-line-window-selected-p)) - '(eglot--managed-mode eglot--mode-line-format))) - "Mode line construct displaying Eglot information. -Specific to the current window's mode line.") - ;;;; Miscellaneous -(defvar-local prot-modeline-notmuch-indicator - '(notmuch-indicator-mode - (" " - (:eval (when (mode-line-window-selected-p) - notmuch-indicator--counters)))) - "The equivalent of `notmuch-indicator-mode-line-construct'. -Display the indicator only on the focused window's mode line.") - (defvar-local prot-modeline-misc-info '(:eval (when (mode-line-window-selected-p) -- cgit v1.2.3