guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: gnu: perl-lingua-translit: Wrap translit program.


From: guix-commits
Subject: branch master updated: gnu: perl-lingua-translit: Wrap translit program.
Date: Sat, 10 Dec 2022 14:45:48 -0500

This is an automated email from the git hooks/post-receive script.

lilyp pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 14ca72226b gnu: perl-lingua-translit: Wrap translit program.
14ca72226b is described below

commit 14ca72226b5319dd138a71df40555d6e90629c81
Author: Evgeny Pisemsky <evgeny@pisemsky.com>
AuthorDate: Sun Oct 23 17:23:11 2022 +0300

    gnu: perl-lingua-translit: Wrap translit program.
    
    * gnu/packages/perl.scm (perl-lingua-translit)[arguments]: Add 
“wrap-translit”
    phase.
    [inputs]: Add bash-minimal.
    
    Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
---
 gnu/packages/perl.scm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index 26d20e4593..f80d84eaa5 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -32,6 +32,7 @@
 ;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
 ;;; Copyright © 2021 Raghav Gururajan <rg@raghavgururajan.name>
 ;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be>
+;;; Copyright © 2022 Evgeny Pisemsky <evgeny@pisemsky.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -6269,6 +6270,18 @@ expression and a list of abbreviations (built in and 
given).")
         (base32
          "1qgap0j0ixmif309dvbqca7sy8xha9xgnj9s2lvh8qrczkc92gqi"))))
     (build-system perl-build-system)
+    (arguments
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'wrap-translit
+            (lambda* (#:key outputs #:allow-other-keys)
+              (let* ((out (assoc-ref outputs "out")))
+                (wrap-program (string-append out "/bin/translit")
+                  `("PERL5LIB" ":" prefix
+                    (,(getenv "PERL5LIB")
+                     ,(string-append out "/lib/perl5/site_perl"))))))))))
+    (inputs (list bash-minimal))
     (home-page "https://metacpan.org/release/Lingua-Translit";)
     (synopsis "Transliterate text between writing systems")
     (description "@code{Lingua::Translit} can be used to convert text from one



reply via email to

[Prev in Thread] Current Thread [Next in Thread]