me
/
guix
Archived
1
0
Fork 0
Code

gnu: gettext: Use gexps for arguments. 

* gnu/packages/gettext.scm (gettext-minimal)[arguments]: Use gexps.
(gnu-gettext)[arguments]: Likewise.
master
Ludovic Courtès 2022-01-06 12:03:14 +01:00
parent a9268216e4
commit 495ac045a3
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 53 additions and 52 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
gnu/packages/gettext.scm
View File

@ -31,6 +31,7 @@
#:use-module ((guix licenses) #:select (gpl2+ gpl3+ bsd-3))
#:use-module (gnu packages)
#:use-module (guix packages)
#:use-module (guix gexp)
#:use-module (guix download)
#:use-module (guix build-system gnu)
#:use-module (guix build-system perl)
@ -71,10 +72,10 @@
;; but for now we include it here in 'gettext-minimal'.
ncurses))
(arguments
`(#:configure-flags '("--with-included-libunistring=no"
(list #:configure-flags #~'("--with-included-libunistring=no"
"--with-included-libxml=no")
#:phases
(modify-phases %standard-phases
#~(modify-phases %standard-phases
(add-before 'patch-source-shebangs 'patch-fixed-paths
(lambda _
(substitute* '("gettext-tools/config.h.in"
@ -113,8 +114,8 @@
#t)))))
;; When tests fail, we want to know the details.
#:make-flags '("VERBOSE=yes"
,@(if (hurd-target?)
#:make-flags #~'("VERBOSE=yes"
#$@(if (hurd-target?)
;; Linking to libgettextlib.so makes test-raise fail
'("XFAIL_TESTS=test-raise")
'()))))
@ -143,7 +144,7 @@ translated messages from the catalogs. Nearly all GNU packages use Gettext.")
(arguments
(substitute-keyword-arguments (package-arguments gettext-minimal)
((#:phases phases)
`(modify-phases ,phases
#~(modify-phases #$phases
(add-after 'install 'add-emacs-autoloads
(lambda* (#:key outputs #:allow-other-keys)
;; Make 'po-mode' and other things available by default.