futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: uniutils: Use GEXPs.

Browse Source 
* gnu/packages/textutils.scm (uniutils): Use GEXPs.

Change-Id: I9e59018b41820778b92e69aad2f64c715986c4e9
Signed-off-by: Zheng Junjie <zhengjunjie@iscas.ac.cn>
This commit is contained in:
Artyom V. Poptsov 2024-08-28 19:27:41 +03:00 committed by Zheng Junjie
parent e8f54ad464
commit 7779ed9aed
No known key found for this signature in database
GPG Key ID: 3B5AA993E1A2DFF0
1 changed files with 12 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
gnu/packages/textutils.scm
View File

@ -497,19 +497,18 @@ useful when it is desired to reformat numbers.
(base32 "0z4ibnd2zzya489vl84cfh82bmdwdhf0isf1myqwrs3s9s0vqyyn"))))
(build-system gnu-build-system)
(arguments
'(#:configure-flags '("--disable-dependency-tracking")
#:phases
(modify-phases %standard-phases
(add-after 'build 'fix-paths
(lambda* (#:key outputs inputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))
(a2b (assoc-ref inputs "ascii2binary"))
(iconv (assoc-ref inputs "libiconv")))
(substitute* "utf8lookup"
(("^ascii2binary ") (string-append a2b "/bin/ascii2binary "))
(("^uniname ") (string-append out "/bin/uniname "))
(("^iconv ") (string-append iconv "/bin/iconv ")))
#t))))))
(list #:configure-flags #~(list "--disable-dependency-tracking")
#:phases
#~(modify-phases %standard-phases
(add-after 'build 'fix-paths
(lambda* (#:key outputs inputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))
(a2b (assoc-ref inputs "ascii2binary"))
(iconv (assoc-ref inputs "libiconv")))
(substitute* "utf8lookup"
(("^ascii2binary ") (string-append a2b "/bin/ascii2binary "))
(("^uniname ") (string-append out "/bin/uniname "))
(("^iconv ") (string-append iconv "/bin/iconv ")))))))))
(inputs
(list ascii2binary libiconv))
(home-page "https://billposer.org/Software/unidesc.html")