mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 21:20:33 +02:00
gnu: Reference the inherited ‘arguments’ value.
This commit was made by running this command:
sed -e's/substitute-keyword-arguments (package-arguments [a-zA-Z0-9-]\+)/substitute-keyword-arguments arguments/g' -i gnu/packages/*.scm
… and then:
1. reverting changes from ‘gnu/packages/rust.scm’ and
‘gnu/packages/java.scm’ since they would incur derivation changes and/or
breakage;
2. reverting the change for ‘gcc-final’ in ‘gnu/packages/commencement.scm’;
3. reverting the change for ‘onnx-optimizer’, ‘openquest’, and ‘certbot’,
which use ‘substitute-keyword-arguments’ for arguments that are not
inherited (and thus ‘arguments’ would be unbound);
4. reverting the change for ‘insight-toolkit-legacy’ and ‘wine64-staging’
which make bogus assumptions about inherited arguments.
Change-Id: I122a7cf517b6b63cae38944b5d33ade4b1f5a89c
This commit is contained in:
@@ -2718,7 +2718,7 @@ command.")
|
||||
(patches (search-patches
|
||||
"wpa-supplicant-dbus-group-policy.patch"))))
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments wpa-supplicant-minimal)
|
||||
(substitute-keyword-arguments arguments
|
||||
((#:phases phases)
|
||||
`(modify-phases ,phases
|
||||
(add-after 'configure 'set-config-options
|
||||
@@ -4746,7 +4746,7 @@ system distribution, akin to many similar tools.")
|
||||
(inherit fastfetch-minimal)
|
||||
(name "fastfetch")
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments fastfetch-minimal)
|
||||
(substitute-keyword-arguments arguments
|
||||
((#:configure-flags flags #~'())
|
||||
#~(append #$flags
|
||||
(list "-DBINARY_LINK_TYPE=dynamic"
|
||||
@@ -6166,7 +6166,7 @@ then it can be a greeter.")
|
||||
(inherit pam-mount)
|
||||
(name "greetd-pam-mount")
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments pam-mount)
|
||||
(substitute-keyword-arguments arguments
|
||||
((#:configure-flags flags ''())
|
||||
#~(cons* "--with-rundir=/run/greetd" #$flags))
|
||||
((#:phases phases)
|
||||
|
||||
Reference in New Issue
Block a user