init.el

@@ -2190,10 +2190,11 @@ Note that this workaround is incomplete, as explained in this comment."
                                         (:propertize "%b" face mode-line-buffer-id)
                                         "@(%l,%c)"
                                         (project-mode-line project-mode-line-format)
-                                        (vc-mode (" " (:eval (moody-ribbon vc-mode))))
+                                        (vc-mode vc-mode)
                                         " "
                                         mode-line-modes)
-                                    '("%b (" mode-name ")")))
+                                    (list "%b "
+                                          "(" mode-name ")")))
                            mode-line-format-right-align
                            (:eval (if (mode-line-window-selected-p)
                                       mode-line-misc-info))))
@@ -2207,8 +2208,8 @@ Note that this workaround is incomplete, as explained in this comment."
 
 (use-package moody
   :ensure t
-  :init (setopt moody-mode-line-height 16)
-  :commands (moody-ribbon))
+  :commands (moody-replace-mode-line-buffer-identification
+             moody-replace-vc-mode))
 
 (use-package smiley
   :init (setq smiley-style 'emoji))