From: Eshel Yaron <me@eshelyaron.com>
Date: Mon, 7 Aug 2023 16:03:21 +0000 (+0300)
Subject: Update Emacs configuration
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a3f0ecc330db56c8ea692af187bd271ad4faa560;p=dotfiles.git

Update Emacs configuration
---

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index feb44c6..0170532 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -1271,12 +1271,13 @@ as the initial input for completion, and return that directory."
    ;; read feeds list from a separate file
    elfeed-feeds (esy/feeds)))
 
+;;; Disable some minor-mode mode-line lighters
 
-(with-eval-after-load 'whitespace-cleanup-mode
-  (setf (alist-get 'whitespace-cleanup-mode minor-mode-alist) '("")))
-
-(with-eval-after-load 'outline
-  (setf (alist-get 'outline-minor-mode minor-mode-alist) '("")))
+(dolist (mm '((whitespace-cleanup-mode . whitespace-cleanup-mode)
+              (outline                 . outline-minor-mode)
+              (abbrev                  . abbrev-mode)))
+  (with-eval-after-load (car mm)
+    (setf (alist-get (cdr mm) minor-mode-alist) '(""))))
 
 ;;; Track currency exchange rates
 
@@ -1372,7 +1373,9 @@ as the initial input for completion, and return that directory."
                             'face face))
               " "
               'display-time-string
-              'battery-mode-line-string)))
+              'battery-mode-line-string
+              (capitalize (substring (symbol-name (car custom-enabled-themes)) 3))
+              " ")))
     "%5l"
     (4 "|%c")
     " "