[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: emacs-emms-print-metadata: Improve package style.
From: |
guix-commits |
Subject: |
02/02: gnu: emacs-emms-print-metadata: Improve package style. |
Date: |
Mon, 4 Jul 2022 09:38:41 -0400 (EDT) |
ngz pushed a commit to branch master
in repository guix.
commit 477e561a46a5d2fe553122396dc376745aa1c9f5
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Mon Jul 4 15:37:31 2022 +0200
gnu: emacs-emms-print-metadata: Improve package style.
* gnu/packages/emacs-xyz.scm (emacs-emms-print-metadata)[arguments]: Use
G-expressions.
---
gnu/packages/emacs-xyz.scm | 24 ++++++++++++------------
1 file changed, 12 insertions(+), 12 deletions(-)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index b9b91f362a..8cfa3f4749 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -2381,18 +2381,18 @@ incrementally confined in Isearch manner.")
(base32 "000lqhsafyh1n293ksnlyavxv1pzl5pazds4sgxjcqd45lyn55ii"))))
(build-system gnu-build-system)
(arguments
- `(#:make-flags '("emms-print-metadata")
- #:tests? #f ; No tests.
- #:phases
- (modify-phases %standard-phases
- (delete 'configure)
- (replace 'install
- (lambda* (#:key outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out")))
- (install-file "src/emms-print-metadata"
- (string-append out "/bin"))
- (install-file "emms-print-metadata.1"
- (string-append out "/share/man/man1"))))))))
+ (list
+ #:make-flags #~(list "emms-print-metadata")
+ #:tests? #f ; No tests.
+ #:phases
+ #~(modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'install
+ (lambda _
+ (install-file "src/emms-print-metadata"
+ (string-append #$output "/bin"))
+ (install-file "emms-print-metadata.1"
+ (string-append #$output "/share/man/man1")))))))
(inputs
(list taglib))
(home-page "https://www.gnu.org/software/emms/")