gnu: scummvm: Use G-expressions.

* gnu/packages/emulators.scm (scummvm)[arguments]: Use G-expressions.
This commit is contained in:
Nicolas Goaziou 2022-10-18 18:03:49 +02:00
parent e598e2a57b
commit e39b4902a0
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D

View file

@ -1515,17 +1515,17 @@ (define-public scummvm
(base32 "1s8psdn3a3hqvvfgmlfxrqqdw8hbr0zyrvirzsnzh6yxmgpvkbwg")))) (base32 "1s8psdn3a3hqvvfgmlfxrqqdw8hbr0zyrvirzsnzh6yxmgpvkbwg"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ;require "git" (list
#:configure-flags (list "--enable-release") ;for optimizations #:tests? #f ;require "git"
#:configure-flags #~(list "--enable-release") ;for optimizations
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(replace 'configure (replace 'configure
;; configure does not work followed by both "SHELL=..." and ;; configure does not work followed by both "SHELL=..." and
;; "CONFIG_SHELL=..."; set environment variables instead ;; "CONFIG_SHELL=..."; set environment variables instead
(lambda* (#:key inputs outputs configure-flags #:allow-other-keys) (lambda* (#:key inputs configure-flags #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let ((bash (search-input-file inputs "/bin/bash"))
(bash (search-input-file inputs "/bin/bash")) (flags `(,(string-append "--prefix=" #$output)
(flags `(,(string-append "--prefix=" out)
,@configure-flags))) ,@configure-flags)))
(setenv "SHELL" bash) (setenv "SHELL" bash)
(setenv "CONFIG_SHELL" bash) (setenv "CONFIG_SHELL" bash)