From e39b4902a07ff5a8cc5e6591e61ed08aa8b11482 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Tue, 18 Oct 2022 18:03:49 +0200 Subject: gnu: scummvm: Use G-expressions. * gnu/packages/emulators.scm (scummvm)[arguments]: Use G-expressions. --- gnu/packages/emulators.scm | 28 ++++++++++++++-------------- 1 file changed, 14 insertions(+), 14 deletions(-) (limited to 'gnu/packages/emulators.scm') diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm index f814dd6968..4d7710f8ea 100644 --- a/gnu/packages/emulators.scm +++ b/gnu/packages/emulators.scm @@ -1515,21 +1515,21 @@ multi-system game/emulator system.") (base32 "1s8psdn3a3hqvvfgmlfxrqqdw8hbr0zyrvirzsnzh6yxmgpvkbwg")))) (build-system gnu-build-system) (arguments - `(#:tests? #f ;require "git" - #:configure-flags (list "--enable-release") ;for optimizations - #:phases - (modify-phases %standard-phases - (replace 'configure - ;; configure does not work followed by both "SHELL=..." and - ;; "CONFIG_SHELL=..."; set environment variables instead - (lambda* (#:key inputs outputs configure-flags #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (bash (search-input-file inputs "/bin/bash")) - (flags `(,(string-append "--prefix=" out) + (list + #:tests? #f ;require "git" + #:configure-flags #~(list "--enable-release") ;for optimizations + #:phases + #~(modify-phases %standard-phases + (replace 'configure + ;; configure does not work followed by both "SHELL=..." and + ;; "CONFIG_SHELL=..."; set environment variables instead + (lambda* (#:key inputs configure-flags #:allow-other-keys) + (let ((bash (search-input-file inputs "/bin/bash")) + (flags `(,(string-append "--prefix=" #$output) ,@configure-flags))) - (setenv "SHELL" bash) - (setenv "CONFIG_SHELL" bash) - (apply invoke "./configure" flags))))))) + (setenv "SHELL" bash) + (setenv "CONFIG_SHELL" bash) + (apply invoke "./configure" flags))))))) (native-inputs (list nasm pkg-config)) (inputs -- cgit 1.4.1