Simplified modeline

diff --git a/config.org b/config.org
index 0035b4c22ce134f6a90383a7af40ddecbd8bdaf3..ac05e704267bc20db4c525177a851bdbf251eac5 100644 (file)
--- a/config.org
+++ b/config.org
@@ -469,7 +469,7 @@ Libraries Not from the package manager
 (keymap-global-set "<end>" #'end-of-buffer)\r
 #+END_SRC\r
 * Commenting and defun-level bindings\r
-#+BEGIN_SRC emacs-lisp\r\r
+#+BEGIN_SRC emacs-lisp\r
 (defun re/comment-dwim (&optional arg)\r
   "Comment region if active, otherwise comment line.\r
   Stolen from https://depp.brause.cc/dotemacs"\r
@@ -911,28 +911,23 @@ Remove all minor modes from the mode-line, and show /all/ of them in the minor m
 (require 'minions)\r
 (minions-mode)\r
 \r
-(setq minions-mode-line-lighter "|+")\r
+(setq minions-mode-line-lighter "+")\r
 #+END_SRC\r
 *** Format\r
 #+BEGIN_SRC emacs-lisp\r
-(setq-default mode-line-format '("%e"\r
-                                (:eval (propertize "  "\r
+(setq-default mode-line-format '(" "\r
+                                (:eval (propertize "%b"\r
                                                    'face\r
                                                    (when (buffer-modified-p)\r
                                                      'mode-line-highlight)))\r
                                 " "\r
-                                (:eval (if buffer-file-name\r
-                                           (abbreviate-file-name buffer-file-name)\r
-                                         "%b"))\r
-                                ":%l,%C "\r
-                                ;; (:eval (propertize "%n " 'face (when (buffer-narrowed-p)\r
-                                ;;                                 'mode-line-highlight)))\r
-                                mode-line-format-right-align\r
-                                (vc-mode vc-mode)\r
-                                " "\r
+                                mode-line-remote\r
+                                "  "\r
                                 minions-mode-line-modes\r
+                                (vc-mode vc-mode)\r
+                                mode-line-format-right-align\r
                                 (:eval (number-to-string (line-number-at-pos (point-max))))\r
-                                " Lines | %Ib "))\r
+                                "L/%Ib (%l,%C) "))\r
 #+END_SRC\r
 ** Pretty Symbols\r
 #+BEGIN_SRC emacs-lisp\r