diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-01-04 20:23:05 +0100 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-01-05 03:54:04 +0100 |
| commit | 0e96a71816eca22aab39f6cfdf0bae1f9d92811d (patch) | |
| tree | 779e89267c601a0329e8115712adf6512b7d6dd2 | |
| parent | 1cba8def9f7836a201942cd7c14d1d423f78b5b5 (diff) | |
| download | guix-0e96a71816eca22aab39f6cfdf0bae1f9d92811d.tar.gz | |
gnu: amsynth: Use G-expressions.
* gnu/packages/music.scm (amsynth)[arguments]: Rewrite as G-expressions.
| -rw-r--r-- | gnu/packages/music.scm | 21 |
1 files changed, 10 insertions, 11 deletions
diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index abafd2550f..44fbe6fd28 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -2414,17 +2414,16 @@ special variant of additive synthesis.") (base32 "0xqcm3ggaj004gfmlsds2x6q8dxlz1akz6dbwkynv9vvdnizm91r")))) (build-system gnu-build-system) (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch-file-names - (lambda* (#:key inputs #:allow-other-keys) - (substitute* "src/GUI/editor_pane.c" - (("/usr/bin/unzip") - (string-append (assoc-ref inputs "unzip") "/bin/unzip"))) - (substitute* "src/GUI/MainMenu.cpp" - (("/usr/bin/which") - (string-append (assoc-ref inputs "which") "/bin/which"))) - #t))))) + (list #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-file-names + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "src/GUI/editor_pane.c" + (("/usr/bin/unzip") + (search-input-file inputs "bin/unzip"))) + (substitute* "src/GUI/MainMenu.cpp" + (("/usr/bin/which") + (search-input-file inputs "bin/which")))))))) (inputs (list alsa-lib gtk+-2 |