summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2022-02-18 21:26:55 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2022-02-18 21:29:05 +0100
commitf32bc54c986cc424bcd20cce7abb0a7b6f24cf28 (patch)
treebaab4d1e227dd1d605c8a62f40b8c9a4724acf9a
parent981cea226d24440fdbea677b8f8eb837049f7e90 (diff)
downloadguix-patches-f32bc54c986cc424bcd20cce7abb0a7b6f24cf28.tar
guix-patches-f32bc54c986cc424bcd20cce7abb0a7b6f24cf28.tar.gz
gnu: emacs-flycheck-ledger: Improve package style.
* gnu/packages/emacs-xyz.scm (emacs-flycheck-ledger)[arguments]: Use G-expressions. Remove trailing #T.
-rw-r--r--gnu/packages/emacs-xyz.scm20
1 files changed, 10 insertions, 10 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 9aac27fa6a..d0e46f34b5 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -6035,17 +6035,17 @@ compile}.")
(file-name (git-file-name name version))
(sha256
(base32 "1djrj3is0dzrl2703bw7bclf33dp4xqmy144q7xj5pvpb9v3kf50"))))
- (inputs (list ledger))
(arguments
- `(#:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'configure
- (lambda* (#:key inputs outputs #:allow-other-keys)
- (let ((ledger (assoc-ref inputs "ledger")))
- ;; Specify the absolute executable location of ledger.
- (substitute* "flycheck-ledger.el"
- (("\"ledger\"") (string-append "\"" ledger "\""))))
- #t)))))
+ (list
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'unpack 'configure
+ (lambda _
+ (let ((ledger #$(this-package-input "ledger")))
+ ;; Specify the absolute executable location of ledger.
+ (substitute* "flycheck-ledger.el"
+ (("\"ledger\"") (string-append "\"" ledger "\"")))))))))
+ (inputs (list ledger))
(propagated-inputs
(list emacs-flycheck))
(build-system emacs-build-system)