From: Evgeny Pisemsky <evgeny@pisemsky.com>
To: 50600@debbugs.gnu.org
Subject: bug#50600: [PATCH] Wrap translit program
Date: Sun, 23 Oct 2022 17:23:11 +0300 [thread overview]
Message-ID: <87mt9mk4a8.fsf@pisemsky.com> (raw)
In-Reply-To: <17be8ab0ff6.11152294086097.7419902109718054739@pisemsky.com>
[-- Attachment #1: Type: text/plain, Size: 161 bytes --]
Here is a patch to fix the issue.
I added bash-minimal to inputs because guix lint said so:
> "bash-minimal" should be in 'inputs' when 'wrap-program' is used
[-- Attachment #2: 0001-Wrap-translit-program.patch --]
[-- Type: text/x-patch, Size: 2097 bytes --]
From 0f908098afd15a608e1254e58d472631dfdf400e Mon Sep 17 00:00:00 2001
From: Evgeny Pisemsky <evgeny@pisemsky.com>
Date: Sun, 23 Oct 2022 17:15:34 +0300
Subject: [PATCH] Wrap translit program
---
gnu/packages/perl.scm | 15 ++++++++++++++-
1 file changed, 14 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index b6c33b2a36..69955f6408 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.
;;;
@@ -6248,9 +6249,21 @@ (define-public perl-lingua-translit
(base32
"1qgap0j0ixmif309dvbqca7sy8xha9xgnj9s2lvh8qrczkc92gqi"))))
(build-system perl-build-system)
+ (arguments
+ `(#: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"))))
+ #t))))))
+ (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
+ (description
+ "@code{Lingua::Translit} can be used to convert text from one
writing system to another, based on national or international transliteration
tables. Where possible a reverse transliteration is supported.")
(license (package-license perl))))
base-commit: 1f734a6f0a7db5b0e12091a0c869c5c4810ac80e
--
2.38.0
next prev parent reply other threads:[~2022-10-23 17:34 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2021-09-15 8:55 bug#50600: Problem with package perl-lingua-translit Evgeny Pisemsky
2022-10-23 14:23 ` Evgeny Pisemsky [this message]
2022-12-10 19:48 ` bug#50600: [PATCH] Wrap translit program Liliana Marie Prikler
2022-12-10 6:55 ` bug#50600: Reminder Evgeny Pisemsky
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87mt9mk4a8.fsf@pisemsky.com \
--to=evgeny@pisemsky.com \
--cc=50600@debbugs.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/guix.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.