summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorgemmaro <gemmaro.dev@gmail.com>2025-07-13 07:28:38 +0900
committerAndreas Enge <andreas@enge.fr>2025-07-13 17:07:44 +0200
commit89d73c352a847e538070e9080efc004d3bc9304a (patch)
treebcc47dca2e43165fb7a15284339b25694194f21a
parenta9fb57af975b9018b83ab7e986e944054052a51a (diff)
gnu: po4a: Update to 0.74.
* gnu/packages/gettext.scm (po4a): Update to 0.74. [arguments]<#:wrap-programs>: Uses PERL5LIB in wrap-program to avoid manually updating Perl dependencies when inputs change; simplifying maintenance and reducing redundancy. [native-inputs]: Add libxml2 package to convert DocBook man files. [inputs]: Add perl-pod-simple package for a new module. Change-Id: Ic9a2a38a3c42e46faf3c9a0ae0a937d794aba751 Signed-off-by: Andreas Enge <andreas@enge.fr>
-rw-r--r--gnu/packages/gettext.scm39
1 files changed, 13 insertions, 26 deletions
diff --git a/gnu/packages/gettext.scm b/gnu/packages/gettext.scm
index 7064809f62..82764e231c 100644
--- a/gnu/packages/gettext.scm
+++ b/gnu/packages/gettext.scm
@@ -11,7 +11,7 @@
;;; Copyright © 2019 Miguel <rosen644835@gmail.com>
;;; Copyright © 2020, 2023, 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2020 EuAndreh <eu@euandre.org>
-;;; Copyright © 2022, 2024 gemmaro <gemmaro.dev@gmail.com>
+;;; Copyright © 2022, 2024, 2025 gemmaro <gemmaro.dev@gmail.com>
;;; Copyright © 2023 Maxim Cournoyer maxim.cournoyer@gmail.com>
;;;
;;; This file is part of GNU Guix.
@@ -249,7 +249,7 @@ from Markdown files.")
(define-public po4a
(package
(name "po4a")
- (version "0.73")
+ (version "0.74")
(source (origin
(method url-fetch)
(uri (string-append "https://github.com/mquinson/po4a"
@@ -257,38 +257,23 @@ from Markdown files.")
version "/po4a-" version ".tar.gz"))
(sha256
(base32
- "184f0cv0w3xa301gwm74srn5s6g8qdn3ksip84wpg8xjihnzh63g"))))
+ "1hp7iy1rl8ci7rirh7r6d3jb0i16jm4vy3mgqd4bsyx35czk5z15"))))
(build-system perl-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'wrap-programs
- (lambda* (#:key inputs outputs #:allow-other-keys)
+ (lambda _
;; Make sure all executables in "bin" find the Perl modules
;; required by this package at runtime.
- (let* ((out #$output)
- (bin (string-append out "/bin/"))
- (path (string-append
- out "/lib/perl5/site_perl:"
- (string-join
- (map (lambda (name)
- (string-append (assoc-ref inputs name)
- "/lib/perl5/site_perl"))
- (list "perl-gettext"
- "perl-pod-parser"
- "perl-sgmls"
- "perl-syntax-keyword-try"
- "perl-xs-parse-keyword"
- "perl-term-readkey"
- "perl-text-wrapi18n"
- "perl-unicode-linebreak"
- "perl-yaml-tiny"))
- ":"))))
- (for-each (lambda (file)
- (wrap-program file
- `("PERL5LIB" ":" prefix (,path))))
- (find-files bin "\\.*$")))))
+ (for-each
+ (lambda (file)
+ (wrap-program file
+ (list "PERL5LIB" 'suffix
+ (list (string-append #$output "/lib/perl5/site_perl")
+ (getenv "PERL5LIB")))))
+ (find-files (string-append #$output "/bin/") "\\.*$"))))
#$@(if (system-hurd?)
#~((add-after 'unpack 'skip-tests/hurd
(lambda _
@@ -301,6 +286,7 @@ from Markdown files.")
perl-module-build
docbook-xsl
libxslt
+ libxml2 ;xmlcatalog
;; For tests.
docbook-sgml-4.1
docbook-xml-4.5
@@ -311,6 +297,7 @@ from Markdown files.")
opensp
perl-gettext
perl-pod-parser
+ perl-pod-simple
perl-sgmls
perl-syntax-keyword-try
perl-xs-parse-keyword