mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2025-02-01 15:26:47 +01:00
gnu: emacs-flycheck-ledger: Improve package style.
* gnu/packages/emacs-xyz.scm (emacs-flycheck-ledger)[arguments]: Use G-expressions. Remove trailing #T.
This commit is contained in:
parent
981cea226d
commit
f32bc54c98
1 changed files with 10 additions and 10 deletions
|
@ -6035,17 +6035,17 @@ (define-public emacs-flycheck-ledger
|
||||||
(file-name (git-file-name name version))
|
(file-name (git-file-name name version))
|
||||||
(sha256
|
(sha256
|
||||||
(base32 "1djrj3is0dzrl2703bw7bclf33dp4xqmy144q7xj5pvpb9v3kf50"))))
|
(base32 "1djrj3is0dzrl2703bw7bclf33dp4xqmy144q7xj5pvpb9v3kf50"))))
|
||||||
(inputs (list ledger))
|
|
||||||
(arguments
|
(arguments
|
||||||
`(#:phases
|
(list
|
||||||
(modify-phases %standard-phases
|
#:phases
|
||||||
(add-after 'unpack 'configure
|
#~(modify-phases %standard-phases
|
||||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
(add-after 'unpack 'configure
|
||||||
(let ((ledger (assoc-ref inputs "ledger")))
|
(lambda _
|
||||||
;; Specify the absolute executable location of ledger.
|
(let ((ledger #$(this-package-input "ledger")))
|
||||||
(substitute* "flycheck-ledger.el"
|
;; Specify the absolute executable location of ledger.
|
||||||
(("\"ledger\"") (string-append "\"" ledger "\""))))
|
(substitute* "flycheck-ledger.el"
|
||||||
#t)))))
|
(("\"ledger\"") (string-append "\"" ledger "\"")))))))))
|
||||||
|
(inputs (list ledger))
|
||||||
(propagated-inputs
|
(propagated-inputs
|
||||||
(list emacs-flycheck))
|
(list emacs-flycheck))
|
||||||
(build-system emacs-build-system)
|
(build-system emacs-build-system)
|
||||||
|
|
Loading…
Reference in a new issue