build-system/python: Use 'ensure-keyword-arguments'.

* guix/build-system/python.scm (package-with-explicit-python): Use
'ensure-keyword-arguments'.
This commit is contained in:
Ludovic Courtès 2016-01-31 23:25:27 +01:00
parent a4db2dd99f
commit f0907d97d4
1 changed files with 5 additions and 8 deletions

View File

@ -101,14 +101,11 @@ NEW-PREFIX; otherwise, NEW-PREFIX is prepended to the name."
(string-length old-prefix))
name))))
(arguments
(let ((arguments (package-arguments p))
(python (if (promise? python)
(force python)
python)))
(if (member #:python arguments)
(substitute-keyword-arguments arguments
((#:python p) python))
(append arguments `(#:python ,python)))))
(let ((python (if (promise? python)
(force python)
python)))
(ensure-keyword-arguments (package-arguments p)
`(#:python ,python))))
(inputs (map rewrite (package-inputs p)))
(propagated-inputs (map rewrite (package-propagated-inputs p)))
(native-inputs (map rewrite (package-native-inputs p))))