     (let ((perc (/ (window-end) 0.01 (point-max))))
       (cond ((eq (window-start) 1) ":Top")
             ((>= perc 100) ":Bot")
-            (t (format ":%d%%%%" perc)))))
+            (t (format ":%d%%%%" perc))))
+    :tight-right t)
 
   (spaceline-define-segment narf-vc
     "Version control info"
     (let ((vc (vc-working-revision buffer-file-name)))
       (when vc
-        (format " %s %s%s " (char-to-string #xe0a0) vc
-                (case (vc-state buffer-file-name) ('edited "+") ('conflict "!!!") (t "")))))
-    :when (and active vc-mode)
-    :tight t)
+        (format "%s%s" vc (case (vc-state buffer-file-name)
+                            ('edited "+")
+                            ('conflict "!!!")
+                            (t "")))))
+    :when (and active vc-mode))
 
   ;; Display version string
   (defvar narf--env-version nil)

    (let ((here anzu--current-position)
          (total anzu--total-matched))
      (when anzu--state
        (cl-case anzu--state
          (search (format "%s/%d%s"
                          (anzu--format-here-position here total)
                          total (if anzu--overflow-p "+" "")))
          (replace-query (format "%d replace" total))
          (replace (format "%d/%d" here total)))))
    :when (and active (bound-and-true-p anzu--state)))

  ;; Initialize modeline
  (spaceline-install
   ;; Left side
   '((narf-anzu :face highlight-face)
     (narf-buffer-path remote-host)
     narf-vc
     narf-buffer-project-name
     ((flycheck-error flycheck-warning flycheck-info) :when active))
   ;; Right side
   '((selection-info :face highlight-face)
     narf-env-version
     narf-buffer-encoding-abbrev
     ((" " :tight t)
      major-mode (minor-modes :tight t :separator " ")
      process :when active)
     (global :when active)
     ("%l/%c" narf-buffer-position)

  (spaceline-define-segment narf-hud
    "A HUD that shows which part of the buffer is currently visible."
    (powerline-hud highlight-face default-face 1)
    :tight-right t)

  (spaceline-define-segment narf-anzu
    "Show the current match number and the total number of matches.  Requires anzu
