summaryrefslogtreecommitdiff
path: root/gnu/packages/audio.scm
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2022-05-01 02:00:01 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2022-05-01 02:00:06 +0200
commit027c21dcf7b81f47c4f0ab5bd429aa2c781e3757 (patch)
treeacf5afb6474639ca9303b4a106fb5ec913661321 /gnu/packages/audio.scm
parentcb8e483c78eed9693c2b68ce490742e58c1efc13 (diff)
gnu: butt: Use G-expressions.
* gnu/packages/audio.scm (butt)[arguments]: Rewrite as G-expressions.
Diffstat (limited to 'gnu/packages/audio.scm')
-rw-r--r--gnu/packages/audio.scm18
1 files changed, 9 insertions, 9 deletions
diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index b75a00d89f..4aa302b59d 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -5466,15 +5466,15 @@ while still staying in time.")
((".*zica.*") "")))))
(build-system gnu-build-system)
(arguments
- `(#:phases
- (modify-phases %standard-phases
- (add-after 'install 'install-documentation
- (lambda* (#:key inputs outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (manual (assoc-ref inputs "manual"))
- (doc (string-append out "/share/doc/" ,name "-" ,version)))
- (install-file "README" doc)
- (copy-file manual (string-append doc "/butt-manual.pdf"))))))))
+ (list #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'install 'install-documentation
+ (lambda _
+ (let ((doc (string-append #$output "/share/doc/"
+ #$name "-" #$version)))
+ (install-file "README" doc)
+ (copy-file #$(this-package-native-input "manual")
+ (string-append doc "/butt-manual.pdf"))))))))
(native-inputs
`(("pkg-config" ,pkg-config)
("manual"