gnu: emacs-cort: Update to 7.1.0.

* gnu/packages/emacs-xyz.scm (emacs-cort): Update to 7.1.0.

gnu/packages/emacs-xyz.scm

@@ -20590,34 +20590,30 @@ functions to ensure they are called with the right arguments during testing.")
     (license license:gpl3+)))
 
 (define-public emacs-cort
-  ;; Choosing a recent commit to fix some bugs.
+  (package
-  ;; https://github.com/conao3/cort.el/issues/106
+    (name "emacs-cort")
-  (let ((commit "495c3972b92b57a0cb5dd65ce5de9d3c6b8b6509")
+    (version "7.1.0")
-        (revision "1"))
+    (source (origin
-    (package
+              (method git-fetch)
-      (name "emacs-cort")
+              (uri (git-reference
-      (version (git-version "3.0.5" revision commit))
+                    (url "https://github.com/conao3/cort.el")
-      (source (origin
+                    (commit (string-append "v" version))))
-                (method git-fetch)
+              (file-name (git-file-name name version))
-                (uri (git-reference
+              (sha256
-                      (url "https://github.com/conao3/cort.el")
+               (base32
-                      (commit commit)))
+                "03c223nczpbdkjmq69panhbsq2a0zj20w329jgj4c0zsj8m1a32a"))))
-                (file-name (git-file-name name version))
+    (build-system emacs-build-system)
-                (sha256
+    (propagated-inputs
-                 (base32
+     `(("emacs-ansi" ,emacs-ansi)))
-                  "0f4irq1arh9c7lf9a5bla25am0jy5r6lj8ayb8k9k7lrirzhyk99"))))
+    (arguments
-      (build-system emacs-build-system)
+     `(#:tests? #t
-      (propagated-inputs
+       #:test-command '("emacs" "--batch" "--quick"
-       `(("emacs-ansi" ,emacs-ansi)))
+                        "--directory=." "--load=cort-tests.el"
-      (arguments
+                        "--funcall=cort-test-run")))
-       `(#:tests? #t
+    (home-page "https://github.com/conao3/cort.el")
-         #:test-command '("emacs" "--batch" "--quick"
+    (synopsis "Unit test framework for the Emacs Lisp")
-                          "--directory=." "--load=cort-tests.el"
+    (description "@code{cort} is a lightweight Emacs Lisp unit test library.")
-                          "--funcall=cort-test-run")))
+    (license license:gpl3+)))
-      (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")