diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-02-18 21:26:55 +0100 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-02-18 21:29:05 +0100 |
| commit | f32bc54c986cc424bcd20cce7abb0a7b6f24cf28 (patch) | |
| tree | baab4d1e227dd1d605c8a62f40b8c9a4724acf9a | |
| parent | 981cea226d24440fdbea677b8f8eb837049f7e90 (diff) | |
| download | guix-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.scm | 20 |
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) |