    '((selection-info :face highlight-face)
      narf-env-version
      narf-buffer-encoding-abbrev
-     ((major-mode :face (if active 'mode-line-buffer-file 'mode-line-inactive) :tight t)
+     ((major-mode :tight-right t)
       (minor-modes :tight t :separator "")
       process :when active)
      (global :when active)
      ("%l·%c" narf-buffer-position)
+     narf-hud
      )))
 
 (provide 'core-ui)

     (if buffer-read-only "[RO]"))
    :face mode-line-is-modified
    :when (not (string-prefix-p "*" (buffer-name)))
    :tight t)

  (spaceline-define-segment narf-buffer-encoding-abbrev

                            ('edited "+")
                            ('conflict "!!!")
                            (t "")))))
    :face other-face
    :when (and active vc-mode))

  (spaceline-define-segment narf-env-version
