aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/freedesktop.scm
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2022-11-11 22:27:50 +0100
committerRicardo Wurmus <rekado@elephly.net>2022-11-11 22:33:27 +0100
commitea96cd272300ae25cdb349d48232296d5ed48126 (patch)
tree7fb107c47087a9bc692942aea0c9660eed0809b4 /gnu/packages/freedesktop.scm
parent9d3cd3c79dd922dcde74e478cc5995836ecd4edb (diff)
downloadguix-ea96cd272300ae25cdb349d48232296d5ed48126.tar
guix-ea96cd272300ae25cdb349d48232296d5ed48126.tar.gz
gnu: plymouth: Use gexps.
* gnu/packages/freedesktop.scm (plymouth)[arguments]: Use gexps.
Diffstat (limited to 'gnu/packages/freedesktop.scm')
-rw-r--r--gnu/packages/freedesktop.scm39
1 files changed, 20 insertions, 19 deletions
diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 07ccf9f8f2..1dbd7753a4 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -2232,8 +2232,9 @@ Its features include:
"11nfgw8yzmdbnbmyd1zfvhj4qh19w1nw0nraai08628x6mzjbbpc"))))
(build-system gnu-build-system)
(arguments
- `(#:configure-flags
- (list (string-append "--with-logo="
+ (list
+ #:configure-flags
+ '(list (string-append "--with-logo="
"/etc/plymouth/logo.png")
(string-append "--with-background-color="
"0x00ff00")
@@ -2250,23 +2251,23 @@ Its features include:
;; Disable GTK to dramatically reduce the closure
;; size from ~800 MiB to a little more than 200 MiB
"--disable-gtk")
- #:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'make-reproducible
- (lambda _
- (substitute* "src/main.c"
- (("__DATE__") "\"guix\""))))
- (add-before 'configure 'fix-docbook
- (lambda* (#:key inputs #:allow-other-keys)
- (substitute* "docs/Makefile.in"
- (("http://docbook.sourceforge.net/release/xsl/current/manpages/docbook.xsl")
- (string-append (assoc-ref inputs "docbook-xsl")
- "/xml/xsl/docbook-xsl-"
- ,(package-version docbook-xsl)
- "/manpages/docbook.xsl")))
- (setenv "XML_CATALOG_FILES"
- (string-append (assoc-ref inputs "docbook-xml")
- "/xml/dtd/docbook/catalog.xml")))))))
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'unpack 'make-reproducible
+ (lambda _
+ (substitute* "src/main.c"
+ (("__DATE__") "\"guix\""))))
+ (add-before 'configure 'fix-docbook
+ (lambda _
+ (substitute* "docs/Makefile.in"
+ (("http://docbook.sourceforge.net/release/xsl/current/manpages/docbook.xsl")
+ (string-append #$(this-package-native-input "docbook-xsl")
+ "/xml/xsl/docbook-xsl-"
+ #$(package-version (this-package-native-input "docbook-xsl"))
+ "/manpages/docbook.xsl")))
+ (setenv "XML_CATALOG_FILES"
+ (string-append #$(this-package-native-input "docbook-xml")
+ "/xml/dtd/docbook/catalog.xml")))))))
(inputs
(list glib pango libdrm libpng eudev))
(native-inputs