Subject: [PATCH 21/22] gnu: licensecheck: Update to 3.3.9.

From: Bruno Victal <[email-masked]>
Date: Thu, 6 Jul 2023 07:42:52 +0100

Beginning 3.0.46 this package has been relicensed under the AGPL-3-or-newer.

* gnu/packages/license.scm (licensecheck): Update to 3.3.9.
[native-inputs]: Remove perl-regexp-pattern, perl-software-license,
perl-test-requires, perl-test-roo, perl-test-script, perl-universal-require,
perl-sub-quote. Add perl-encode-locale, perl-regexp-pattern-license,
perl-string-copyright, perl-test-without-module, perl-test2-suite,
perl-test2-tools-command.
[propagated-inputs]: Use new style. Remove perl-getopt-long-descriptive,
perl-moo, perl-regexp-pattern-license, perl-sort-key, perl-strictures,
perl-try-tiny, perl-module-runtime. Add perl-feature-compat-class,
perl-feature-compat-try,  perl-io-interactive, perl-log-any,
perl-log-any-adapter-screen, perl-string-license.
[license]: Change to agpl3+.
---
 gnu/packages/license.scm | 45 ++++++++++++++++++++--------------------
 1 file changed, 22 insertions(+), 23 deletions(-)

diff --git a/gnu/packages/license.scm b/gnu/packages/license.scm
index 6fa9403272..025e1aa3bb 100644
--- a/gnu/packages/license.scm
+++ b/gnu/packages/license.scm
@@ -30,6 +30,7 @@ (define-module (gnu packages license)
   #:use-module (gnu packages python-build)
   #:use-module (gnu packages python-web)
   #:use-module (gnu packages python-xyz)
+  #:use-module (gnu packages web)
   #:use-module (guix build-system perl)
   #:use-module (guix build-system python)
   #:use-module (guix build-system pyproject)
@@ -148,7 +149,7 @@ (define-public perl-software-license
 (define-public licensecheck
   (package
     (name "licensecheck")
-    (version "3.0.37")
+    (version "3.3.9")
     (source (origin
               (method url-fetch)
               (uri (string-append
@@ -156,31 +157,29 @@ (define-public licensecheck
                     "v" version ".tar.gz"))
               (sha256
                (base32
-                "12l83zf85zagpagizmzy3bwkc659sbzqf18cycx8g4h6d3mc5kqw"))))
+                "17sfw2cz5x339zq6xc2nfjps2vwpj3d307v90gva498fvnlk1y4y"))))
     (build-system perl-build-system)
     (native-inputs
-     (list perl-regexp-pattern
-           perl-software-license
-           perl-test-requires
-           perl-test-roo
-           perl-test-script
-           perl-universal-require
+     (list perl-encode-locale
            perl-number-range
-           perl-sub-quote))
+           perl-regexp-pattern-license
+           perl-string-copyright
+           perl-test-without-module
+           perl-test2-suite
+           perl-test2-tools-command))
     (propagated-inputs
-     `(("perl-getopt-long-descriptive" ,perl-getopt-long-descriptive)
-       ("perl-moo" ,perl-moo-2)
-       ("perl-namespace-clean" ,perl-namespace-clean)
-       ("perl-path-iterator-rule" ,perl-path-iterator-rule)
-       ("perl-path-tiny" ,perl-path-tiny)
-       ("perl-pod-constants" ,perl-pod-constants)
-       ("perl-regexp-pattern-license" ,perl-regexp-pattern-license)
-       ("perl-sort-key" ,perl-sort-key)
-       ("perl-strictures" ,perl-strictures-2)
-       ("perl-string-copyright" ,perl-string-copyright)
-       ("perl-string-escape" ,perl-string-escape)
-       ("perl-try-tiny" ,perl-try-tiny)
-       ("perl-module-runtime" ,perl-module-runtime)))
+     (list perl-feature-compat-class
+           perl-feature-compat-try
+           perl-io-interactive
+           perl-log-any
+           perl-log-any-adapter-screen
+           perl-namespace-clean
+           perl-path-iterator-rule
+           perl-path-tiny
+           perl-pod-constants
+           perl-string-copyright
+           perl-string-escape
+           perl-string-license))
     (arguments
      `(#:phases
        (modify-phases %standard-phases
@@ -198,7 +197,7 @@ (define-public licensecheck
     (description "Licensecheck attempts to determine the license that applies
 to each file passed to it, by searching the start of the file for text
 belonging to various licenses.")
-    (license (package-license perl))))
+    (license agpl3+)))
 
 (define-public reuse
   (package
-- 
2.40.1