mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu: emacs-ledger-mode: Use ledger as input.
* gnu/packages/finance.scm (emacs-ledger-mode)[inputs]: Add ledger. [arguments]: Patch path to ledger executable.
This commit is contained in:
parent
9ca762eb83
commit
1c0dd73092
1 changed files with 9 additions and 0 deletions
|
@ -241,6 +241,13 @@ (define-public emacs-ledger-mode
|
|||
#:tests? #f ; there are none
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-before 'build 'patch-path
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((ledger (assoc-ref inputs "ledger")))
|
||||
(make-file-writable "ledger-exec.el")
|
||||
(emacs-substitute-variables "ledger-exec.el"
|
||||
("ledger-binary-path" (string-append ledger "/bin/ledger"))))
|
||||
#t))
|
||||
(add-after 'build 'build-doc
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let ((target (string-append (assoc-ref outputs "out")
|
||||
|
@ -260,6 +267,8 @@ (define-public emacs-ledger-mode
|
|||
(rename-file orig-dir dest-dir)
|
||||
(emacs-generate-autoloads ,name dest-dir)
|
||||
#t))))))
|
||||
(inputs
|
||||
`(("ledger" ,ledger)))
|
||||
(native-inputs
|
||||
`(("emacs-minimal" ,emacs-minimal)
|
||||
("texinfo" ,texinfo)))
|
||||
|
|
Loading…
Reference in a new issue