diff --git a/gnu/packages/rust-apps.scm b/gnu/packages/rust-apps.scm
index 3e166b20dd..16b2641880 100644
--- a/gnu/packages/rust-apps.scm
+++ b/gnu/packages/rust-apps.scm
@@ -1754,36 +1754,35 @@ and some other stuff.")
 (define-public macchina
   (package
     (name "macchina")
-    (version "6.1.8")
+    (version "6.4.0")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "macchina" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "044bygdazv8l1d5sf7pxn2xp26pmnx2b65122qzb37m1ylb1ksg6"))))
+        (base32 "0m1hkf81njdbx69c2k3hp3dslq6xfh14hs8v7iadw3cl44dshb7r"))))
     (build-system cargo-build-system)
     (arguments
      (list
       #:install-source? #f
-      #:cargo-inputs `(("rust-ansi-to-tui" ,rust-ansi-to-tui-2)
+      #:cargo-inputs `(("rust-ansi-to-tui" ,rust-ansi-to-tui-7)
                        ("rust-atty" ,rust-atty-0.2)
                        ("rust-bytesize" ,rust-bytesize-1)
                        ("rust-clap" ,rust-clap-4)
-                       ("rust-color-to-tui" ,rust-color-to-tui-0.2)
                        ("rust-colored" ,rust-colored-2)
-                       ("rust-dirs" ,rust-dirs-4)
+                       ("rust-dirs" ,rust-dirs-5)
                        ("rust-lazy-static" ,rust-lazy-static-1)
-                       ("rust-libmacchina" ,rust-libmacchina-6)
+                       ("rust-libmacchina" ,rust-libmacchina-8)
                        ("rust-rand" ,rust-rand-0.8)
+                       ("rust-ratatui" ,rust-ratatui-0.29)
                        ("rust-serde" ,rust-serde-1)
                        ("rust-serde-json" ,rust-serde-json-1)
                        ("rust-shellexpand" ,rust-shellexpand-3)
                        ("rust-thiserror" ,rust-thiserror-1)
-                       ("rust-toml" ,rust-toml-0.5)
-                       ("rust-tui" ,rust-tui-0.19)
+                       ("rust-toml" ,rust-toml-0.8)
                        ("rust-unicode-width" ,rust-unicode-width-0.1)
-                       ("rust-vergen" ,rust-vergen-7))
+                       ("rust-vergen" ,rust-vergen-8))
       #:phases #~(modify-phases %standard-phases
                    (add-after 'install 'install-extras
                      (lambda* (#:key outputs #:allow-other-keys)