src/xyz/euandreh/pending.scm: Update po4a-text

1 files changed, 18 insertions, 17 deletions

diff --git a/src/xyz/euandreh/pending.scm b/src/xyz/euandreh/pending.scm
index b0d20e7..8f6e56d 100644
--- a/src/xyz/euandreh/pending.scm
+++ b/src/xyz/euandreh/pending.scm
@@ -14,14 +14,14 @@
 (define-public po4a-text
   (package
     (name "po4a-text")
-    (version "0.61")
+    (version "0.63")
     (source (origin
               (method url-fetch)
               (uri (string-append "https://github.com/mquinson/po4a/releases/download/v"
                                   version "/po4a-" version ".tar.gz"))
               (sha256
                (base32
-                "1nw61dj7ymrsjps79vvfdzp549drwd51kyj598937zvyafq4r5b2"))))
+                "1kmlfpdl1i1wrcdn0k1frh44fq10sfwswi3azvibli2lakpf66z2"))))
     (build-system perl-build-system)
     (arguments
      `(#:phases
@@ -30,30 +30,32 @@
           (lambda* (#:key outputs inputs #:allow-other-keys)
             ;; Make sure all executables in "bin" find the Perl modules
             ;; provided by this package at runtime.
-            (let* ((out       (assoc-ref outputs "out"))
-                   (bin       (string-append out "/bin/"))
-                   (path      (string-append out "/lib/perl5/site_perl"))
-                   (deps-path (string-append (assoc-ref inputs "perl-yaml-tiny")
-                                             "/lib/perl5/site_perl")))
+            (let* ((out  (assoc-ref outputs "out"))
+                   (bin  (string-append out "/bin/"))
+                   (path (string-append out
+		                        "/lib/perl5/site_perl"
+					":"
+					(assoc-ref inputs "perl-yaml-tiny")
+                                        "/lib/perl5/site_perl"
+					":"
+					(assoc-ref inputs "perl-pod-parser")
+					"/lib/perl5/site_perl")))
               (for-each (lambda (file)
                           (wrap-program file
-                            `("PERL5LIB" ":" prefix (,path
-                                                     ,deps-path))))
+                            `("PERL5LIB" ":" prefix (,path))))
                         (find-files bin "\\.*$")))))
          (add-before 'reset-gzip-timestamps 'make-compressed-files-writable
            (lambda* (#:key outputs #:allow-other-keys)
              (for-each make-file-writable
                        (find-files (string-append (assoc-ref outputs "out")
                                                   "/share/man")
-                                   ".*\\.gz$"))
-             #t))
+                                   ".*\\.gz$"))))
          (add-after 'unpack 'patch-docbook-xml
            (lambda* (#:key inputs #:allow-other-keys)
              (substitute* (find-files "." ".*\\.xml(-good)?")
                (("http://www.oasis-open.org/docbook/xml/4.1.2/")
                 (string-append (assoc-ref inputs "docbook-xml")
-                               "/xml/dtd/docbook/")))
-             #t))
+                               "/xml/dtd/docbook/")))))
          (add-before 'check 'disable-failing-tests
            (lambda _
              (delete-file "t/01-classes.t")
@@ -61,9 +63,7 @@
              (delete-file "t/add.t")
              (delete-file "t/core-porefs.t")
              (delete-file "t/fmt-asciidoc.t")
-             (delete-file "t/fmt-sgml.t")
-
-             #t)))))
+             (delete-file "t/fmt-sgml.t"))))))
     (native-inputs
      `(("gettext" ,gettext-minimal)
        ("perl-module-build" ,perl-module-build)
@@ -76,7 +76,8 @@
        ("perl-test-pod" ,perl-test-pod)
        ("texlive" ,texlive-tiny)))
     (propagated-inputs
-     `(("perl-yaml-tiny" ,perl-yaml-tiny)))
+     `(("perl-yaml-tiny" ,perl-yaml-tiny)
+       ("perl-pod-parser" ,perl-pod-parser)))
     (home-page "https://po4a.org/")
     (synopsis "Scripts to ease maintenance of translations")
     (description