1 files changed, 31 insertions, 21 deletions

@@ -1278,27 +1278,32 @@ See also `crux-reopen-as-root-mode'."
 (setup (:straight (simple-modeline
                    :fork (:host github :repo "duckwork/simple-modeline")))
   (:require +modeline)
-  (:option simple-modeline-segments `((;; left
-                                       +modeline-ace-window-display
-                                       +modeline-modified
-                                       ,(+modeline-concat
-                                         '(+modeline-god-mode
-                                           +modeline-reading-mode
-                                           +modeline-narrowed)
-                                         ",")
-                                       +modeline-buffer-name
-                                       +modeline-position
-                                       +modeline-anzu
-                                       )
-                                      (;; right
-                                       +modeline-track
-                                       +modeline-vc
-                                       simple-modeline-segment-misc-info
-                                       simple-modeline-segment-process
-                                       +modeline-text-scale
-                                       +modeline-minions
-                                       +modeline-major-mode
-                                       )))
+  (:option simple-modeline-segments
+           `(( ; left
+              +modeline-ace-window-display
+              +modeline-modified
+              +modeline-buffer-name
+              (lambda () (+modeline-vc ": "))
+              ,(+modeline-concat
+                '(+modeline-minions
+                  +modeline-major-mode))
+              +modeline-anzu
+              )
+             ( ; right
+              (lambda ()
+                (unless +tab-bar-misc-info-mode
+                  (+modeline-concat
+                   '(+modeline-track
+                     simple-modeline-segment-misc-info))))
+
+              simple-modeline-segment-process
+              +modeline-text-scale
+              ,(+modeline-concat
+                '(+modeline-god-mode
+                  +modeline-reading-mode
+                  +modeline-narrowed)
+                ",")
+              +modeline-position)))
   (simple-modeline-mode +1))
 
 (setup (:straight smartscan)
@@ -1469,3 +1474,8 @@ See also `crux-reopen-as-root-mode'."
   (:require +zzz-to-char)
   (:option zzz-to-char-reach 1024)
   (:global "M-z" #'+zzz-to-char))
+
+(setup tab-bar
+  (:require +tab-bar)
+  (tab-bar-mode +1)
+  (+tab-bar-misc-info-mode +1))