More mode-line customization

diff --git a/init.el b/init.el
index 33ab062464e21da31d99a218c26c4b08ad038b4a..50b613c1d7831a4a9efab08e835d91151d0ffb23 100644 (file)
--- a/init.el
+++ b/init.el
@@ -165,21 +165,16 @@
              '("%e"
                (:eval (propertize "  "
                                   'face
-                                  (if (buffer-modified-p)
-                                      'mode-line-highlight
-                                    'header-line)))
+                                  (when (buffer-modified-p)
+                                      'mode-line-highlight)))
                " "
                (:propertize (buffer-file-name "%f" "%b")
                             face
                             mode-line-buffer-id)
-               " (%Ib) "
-               mode-line-remote
-               mode-line-format-right-align
                (vc-mode vc-mode)
-               " %["
-               mode-name
-               "%]"
-               "%n %l,%C "))
+               mode-line-format-right-align
+               (:eval (number-to-string (line-number-at-pos (point-max))))
+               "L @ %I%n %l,%C "))
 
 (setq prettify-symbols-alist '(("lambda" . 955)
                               ("delta" . 120517)