aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2023-08-06 02:00:00 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2023-08-13 02:00:00 +0200
commit05c7e70b966f7080f48bd685cf75fa52ff6820a4 (patch)
treeb2a79a30121f642ba879082a3ab1205e6decde7d /gnu
parent45900e4cac951bf5ecba0cefefa5ca8afefe5b00 (diff)
downloadguix-05c7e70b966f7080f48bd685cf75fa52ff6820a4.tar.gz
guix-05c7e70b966f7080f48bd685cf75fa52ff6820a4.zip
gnu: corsix-th: Use G-expressions.
* gnu/packages/games.scm (corsix-th)[arguments]: Rewrite as G-expressions.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/games.scm39
1 files changed, 19 insertions, 20 deletions
diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 56ecb65454..a417630624 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -1172,26 +1172,25 @@ allows users to brew while offline.")
(base32 "14996kbrwdrd0gpz19il2i4p650qdhjw8v8ka3aigk6pl4kda3sq"))))
(build-system cmake-build-system)
(arguments
- `(#:phases
- (modify-phases %standard-phases
- (add-after 'install 'wrap-binary
- (lambda _
- ;; Set Lua module paths and default MIDI soundfont on startup.
- (let* ((out (assoc-ref %outputs "out"))
- (fluid (assoc-ref %build-inputs "fluid-3"))
- (lua-version ,(version-major+minor (package-version lua)))
- (lua-cpath
- (map (lambda (lib)
- (string-append
- (assoc-ref %build-inputs (string-append "lua-" lib))
- "/lib/lua/" lua-version "/?.so"))
- '("filesystem" "lpeg"))))
- (wrap-program (string-append out "/bin/corsix-th")
- `("LUA_CPATH" ";" = ,lua-cpath)
- `("SDL_SOUNDFONTS" ":" suffix
- (,(string-append fluid "/share/soundfonts/FluidR3Mono_GM.sf3")))))
- #t)))
- #:tests? #f)) ; TODO need busted package to run tests
+ (list
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'install 'wrap-binary
+ (lambda _
+ ;; Set Lua module paths and default MIDI soundfont on startup.
+ (let* ((fluid #$(this-package-input "fluid-3"))
+ (lua-version #$(version-major+minor (package-version lua)))
+ (lua-cpath
+ (map (lambda (lib)
+ (string-append
+ (assoc-ref %build-inputs (string-append "lua-" lib))
+ "/lib/lua/" lua-version "/?.so"))
+ '("filesystem" "lpeg"))))
+ (wrap-program (string-append #$output "/bin/corsix-th")
+ `("LUA_CPATH" ";" = ,lua-cpath)
+ `("SDL_SOUNDFONTS" ":" suffix
+ (,(string-append fluid "/share/soundfonts/FluidR3Mono_GM.sf3"))))))))
+ #:tests? #f)) ; TODO need busted package to run tests
;; Omit Lua-Socket dependency to disable automatic updates.
(inputs
(list ffmpeg