(Emacs)~mode line now pads vc information

Emacs/.config/emacs/config.org

@@ -302,9 +302,17 @@ Currently I use the default mode line with some customisation;
 simplicity is above all.
 *** Emacs Mode-line
 #+begin_src emacs-lisp
+(defun +mode-line/generate-padding ()
+  (let ((wid (frame-width))
+        (str ""))
+    (dotimes (n (floor (/ wid 7)))
+      (setq str (concat str " ")))
+    str))
+
 (setq-default
  mode-line-format
- (list "%l:%c    " ;; Line and column
+ (list
+  "%l:%c    " ;; Line and column
   "%p[" ;; Where in file + Evil state
   '(:eval (upcase
            (substring
@@ -317,8 +325,8 @@ simplicity is above all.
   '(:eval (format "%s" major-mode))
   ")    "
   "%I    "
+  '(:eval (+mode-line/generate-padding))
   '(vc-mode vc-mode)
-       "        "
   mode-line-misc-info
   mode-line-end-spaces))
 #+end_src