gnu: plymouth: Use gexps.
* gnu/packages/freedesktop.scm (plymouth)[arguments]: Use gexps.
This commit is contained in:
parent
9d3cd3c79d
commit
ea96cd2723
|
@ -2232,8 +2232,9 @@ (define-public plymouth
|
||||||
"11nfgw8yzmdbnbmyd1zfvhj4qh19w1nw0nraai08628x6mzjbbpc"))))
|
"11nfgw8yzmdbnbmyd1zfvhj4qh19w1nw0nraai08628x6mzjbbpc"))))
|
||||||
(build-system gnu-build-system)
|
(build-system gnu-build-system)
|
||||||
(arguments
|
(arguments
|
||||||
`(#:configure-flags
|
(list
|
||||||
(list (string-append "--with-logo="
|
#:configure-flags
|
||||||
|
'(list (string-append "--with-logo="
|
||||||
"/etc/plymouth/logo.png")
|
"/etc/plymouth/logo.png")
|
||||||
(string-append "--with-background-color="
|
(string-append "--with-background-color="
|
||||||
"0x00ff00")
|
"0x00ff00")
|
||||||
|
@ -2251,21 +2252,21 @@ (define-public plymouth
|
||||||
;; size from ~800 MiB to a little more than 200 MiB
|
;; size from ~800 MiB to a little more than 200 MiB
|
||||||
"--disable-gtk")
|
"--disable-gtk")
|
||||||
#:phases
|
#:phases
|
||||||
(modify-phases %standard-phases
|
#~(modify-phases %standard-phases
|
||||||
(add-after 'unpack 'make-reproducible
|
(add-after 'unpack 'make-reproducible
|
||||||
(lambda _
|
(lambda _
|
||||||
(substitute* "src/main.c"
|
(substitute* "src/main.c"
|
||||||
(("__DATE__") "\"guix\""))))
|
(("__DATE__") "\"guix\""))))
|
||||||
(add-before 'configure 'fix-docbook
|
(add-before 'configure 'fix-docbook
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
(lambda _
|
||||||
(substitute* "docs/Makefile.in"
|
(substitute* "docs/Makefile.in"
|
||||||
(("http://docbook.sourceforge.net/release/xsl/current/manpages/docbook.xsl")
|
(("http://docbook.sourceforge.net/release/xsl/current/manpages/docbook.xsl")
|
||||||
(string-append (assoc-ref inputs "docbook-xsl")
|
(string-append #$(this-package-native-input "docbook-xsl")
|
||||||
"/xml/xsl/docbook-xsl-"
|
"/xml/xsl/docbook-xsl-"
|
||||||
,(package-version docbook-xsl)
|
#$(package-version (this-package-native-input "docbook-xsl"))
|
||||||
"/manpages/docbook.xsl")))
|
"/manpages/docbook.xsl")))
|
||||||
(setenv "XML_CATALOG_FILES"
|
(setenv "XML_CATALOG_FILES"
|
||||||
(string-append (assoc-ref inputs "docbook-xml")
|
(string-append #$(this-package-native-input "docbook-xml")
|
||||||
"/xml/dtd/docbook/catalog.xml")))))))
|
"/xml/dtd/docbook/catalog.xml")))))))
|
||||||
(inputs
|
(inputs
|
||||||
(list glib pango libdrm libpng eudev))
|
(list glib pango libdrm libpng eudev))
|
||||||
|
|
Loading…
Reference in a new issue