diff options
author | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-08-06 02:00:00 +0200 |
---|---|---|
committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-08-13 02:00:00 +0200 |
commit | 05c7e70b966f7080f48bd685cf75fa52ff6820a4 (patch) | |
tree | b2a79a30121f642ba879082a3ab1205e6decde7d /gnu | |
parent | 45900e4cac951bf5ecba0cefefa5ca8afefe5b00 (diff) | |
download | guix-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.scm | 39 |
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 |