From 692cce52cafd5477056835fd01f7b283afeace46 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Fri, 8 Oct 2021 12:14:42 +0200 Subject: gnu: joycond: Small refactoring. * gnu/packages/games.scm (joycond)[arguments]<#:phases>: Use (assoc-ref outputs "out") instead of %output. --- gnu/packages/games.scm | 20 ++++++++++++-------- 1 file changed, 12 insertions(+), 8 deletions(-) (limited to 'gnu') diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm index 44558b88d4..58d28d7da1 100644 --- a/gnu/packages/games.scm +++ b/gnu/packages/games.scm @@ -1504,20 +1504,24 @@ automata. The following features are available: (commit commit))) (file-name (git-file-name name version)) (sha256 - (base32 - "07z86yp27vxc0b44jgvf1vpa69rh3wdvd1xbzcsrj3f32743pv5a")))) + (base32 "07z86yp27vxc0b44jgvf1vpa69rh3wdvd1xbzcsrj3f32743pv5a")))) (build-system cmake-build-system) (arguments `(#:tests? #f ;no test suite #:phases (modify-phases %standard-phases (add-after 'unpack 'fix-bin-location - (lambda* _ - (substitute* "CMakeLists.txt" - (("/lib/udev/rules.d") (string-append %output "/lib/udev/rules.d")) - (("/etc/systemd/system") (string-append %output "/etc/systemd/system")) - (("/etc/modules-load.d") (string-append %output "/etc/modules-load.d")) - (("/usr/bin") (string-append %output "/bin")))))))) + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (substitute* "CMakeLists.txt" + (("/lib/udev/rules.d") + (string-append out "/lib/udev/rules.d")) + (("/etc/systemd/system") + (string-append out "/etc/systemd/system")) + (("/etc/modules-load.d") + (string-append out "/etc/modules-load.d")) + (("/usr/bin") + (string-append out "/bin"))))))))) (native-inputs `(("pkg-config" ,pkg-config))) (inputs `(("eudev" ,eudev) -- cgit v1.2.3