Update Emacs configuration

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index feb44c689ca68aaac4eeed259a144340643fc807..01705324c3814ff9c583a0f6e69270ffb8ab8cd0 100644 (file)
--- 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")
     " "