diff options
| author | Pierre Neidhardt <mail@ambrevar.xyz> | 2019-04-24 11:12:02 +0200 |
|---|---|---|
| committer | Pierre Neidhardt <mail@ambrevar.xyz> | 2019-04-24 11:12:02 +0200 |
| commit | 1c0dd730922b49c333d793295d912ce44e13498c (patch) | |
| tree | 4d71928ee450fdb6b63e0e883cd3729893367185 | |
| parent | 9ca762eb83592d81f825c70505d8797d7290dd1d (diff) | |
| download | guix-1c0dd730922b49c333d793295d912ce44e13498c.tar guix-1c0dd730922b49c333d793295d912ce44e13498c.tar.gz | |
gnu: emacs-ledger-mode: Use ledger as input.
* gnu/packages/finance.scm (emacs-ledger-mode)[inputs]: Add ledger.
[arguments]: Patch path to ledger executable.
| -rw-r--r-- | gnu/packages/finance.scm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/gnu/packages/finance.scm b/gnu/packages/finance.scm index bd30d466f4..9a210b474f 100644 --- a/gnu/packages/finance.scm +++ b/gnu/packages/finance.scm @@ -241,6 +241,13 @@ in ability, and easy to use.") #: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 @@ in ability, and easy to use.") (rename-file orig-dir dest-dir) (emacs-generate-autoloads ,name dest-dir) #t)))))) + (inputs + `(("ledger" ,ledger))) (native-inputs `(("emacs-minimal" ,emacs-minimal) ("texinfo" ,texinfo))) |