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 --------------------- bard-emacs-modules/bard-emacs-modeline.el | 2 -- 2 files changed, 23 deletions(-) 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) diff --git a/bard-emacs-modules/bard-emacs-modeline.el b/bard-emacs-modules/bard-emacs-modeline.el index a1cf965..dcedd95 100644 --- a/bard-emacs-modules/bard-emacs-modeline.el +++ b/bard-emacs-modules/bard-emacs-modeline.el @@ -78,8 +78,6 @@ " " prot-modeline-flymake " " - prot-modeline-notmuch-indicator - " " prot-modeline-misc-info)) (provide 'bard-emacs-modeline) -- cgit v1.2.3