diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2022-11-11 22:27:50 +0100 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2022-11-11 22:33:27 +0100 |
commit | ea96cd272300ae25cdb349d48232296d5ed48126 (patch) | |
tree | 7fb107c47087a9bc692942aea0c9660eed0809b4 /gnu/packages/freedesktop.scm | |
parent | 9d3cd3c79dd922dcde74e478cc5995836ecd4edb (diff) | |
download | guix-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.scm | 39 |
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 |