From dcd9b6505fa46d139d40141cf29d7eef15c46481 Mon Sep 17 00:00:00 2001 Message-Id: In-Reply-To: <73b2dfe98591073104fd069622ede2acab0c7655.1694806866.git.striness@tilde.club> References: <73b2dfe98591073104fd069622ede2acab0c7655.1694806866.git.striness@tilde.club> From: Ulf Herrman Date: Fri, 15 Sep 2023 07:48:48 -0500 Subject: [PATCH 2/5] build-system: asdf: use substitute-keyword-arguments with default. A two-argument substitute-keyword-arguments clause won't be evaluated when there isn't already a keyword in the argument list. Using a three-argument clause allows the phases-transformer to be run in all cases. * guix/build-system/asdf.scm (package-with-build-system): use %standard-phases as default value of `phases', use gexps. --- guix/build-system/asdf.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/guix/build-system/asdf.scm b/guix/build-system/asdf.scm index 2b17cee37b..cd041eed4f 100644 --- a/guix/build-system/asdf.scm +++ b/guix/build-system/asdf.scm @@ -218,7 +218,8 @@ (define* (package-with-build-system from-build-system to-build-system (build-system to-build-system) (arguments (substitute-keyword-arguments base-arguments - ((#:phases phases) (list phases-transformer phases)))) + ((#:phases phases #~%standard-phases) + #~(#$phases-transformer #$phases)))) (inputs (new-inputs package-inputs)) (propagated-inputs (new-propagated-inputs)) (native-inputs (append (if target-is-source? -- 2.40.1