summaryrefslogtreecommitdiff
path: root/gnu/packages/music.scm
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2022-01-04 20:23:05 +0100
committerTobias Geerinckx-Rice <me@tobias.gr>2022-01-05 03:54:04 +0100
commit0e96a71816eca22aab39f6cfdf0bae1f9d92811d (patch)
tree779e89267c601a0329e8115712adf6512b7d6dd2 /gnu/packages/music.scm
parent1cba8def9f7836a201942cd7c14d1d423f78b5b5 (diff)
downloadguix-patches-0e96a71816eca22aab39f6cfdf0bae1f9d92811d.tar
guix-patches-0e96a71816eca22aab39f6cfdf0bae1f9d92811d.tar.gz
gnu: amsynth: Use G-expressions.
* gnu/packages/music.scm (amsynth)[arguments]: Rewrite as G-expressions.
Diffstat (limited to 'gnu/packages/music.scm')
-rw-r--r--gnu/packages/music.scm21
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