diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 3b462e790e..6474223afd 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -20590,34 +20590,30 @@ (define-public emacs-buttercup
     (license license:gpl3+)))
 
 (define-public emacs-cort
-  ;; Choosing a recent commit to fix some bugs.
-  ;; https://github.com/conao3/cort.el/issues/106
-  (let ((commit "495c3972b92b57a0cb5dd65ce5de9d3c6b8b6509")
-        (revision "1"))
-    (package
-      (name "emacs-cort")
-      (version (git-version "3.0.5" revision commit))
-      (source (origin
-                (method git-fetch)
-                (uri (git-reference
-                      (url "https://github.com/conao3/cort.el")
-                      (commit commit)))
-                (file-name (git-file-name name version))
-                (sha256
-                 (base32
-                  "0f4irq1arh9c7lf9a5bla25am0jy5r6lj8ayb8k9k7lrirzhyk99"))))
-      (build-system emacs-build-system)
-      (propagated-inputs
-       `(("emacs-ansi" ,emacs-ansi)))
-      (arguments
-       `(#:tests? #t
-         #:test-command '("emacs" "--batch" "--quick"
-                          "--directory=." "--load=cort-tests.el"
-                          "--funcall=cort-test-run")))
-      (home-page "https://github.com/conao3/cort.el")
-      (synopsis "Unit test framework for the Emacs Lisp")
-      (description "@code{cort} is a lightweight Emacs Lisp unit test library.")
-      (license license:gpl3+))))
+  (package
+    (name "emacs-cort")
+    (version "7.1.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/conao3/cort.el")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "03c223nczpbdkjmq69panhbsq2a0zj20w329jgj4c0zsj8m1a32a"))))
+    (build-system emacs-build-system)
+    (propagated-inputs
+     `(("emacs-ansi" ,emacs-ansi)))
+    (arguments
+     `(#:tests? #t
+       #:test-command '("emacs" "--batch" "--quick"
+                        "--directory=." "--load=cort-tests.el"
+                        "--funcall=cort-test-run")))
+    (home-page "https://github.com/conao3/cort.el")
+    (synopsis "Unit test framework for the Emacs Lisp")
+    (description "@code{cort} is a lightweight Emacs Lisp unit test library.")
+    (license license:gpl3+)))
 
 (define-public emacs-wordnut
   (let ((commit "feac531404041855312c1a046bde7ea18c674915")