diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-07-11 10:52:22 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-07-11 10:58:25 +0200 |
| commit | 3d363715fad0ce0fec5f22b29a97dc0fe90b3ebf (patch) | |
| tree | d70c57e2bfe12dcca7e820899c9264361f14968e | |
| parent | a3fa82ddea93fd201cf83e06e5fab9f3d46159f1 (diff) | |
| download | guix-3d363715fad0ce0fec5f22b29a97dc0fe90b3ebf.tar.gz | |
gnu: emacs-calibredb: Update package style.
* gnu/packages/emacs-xyz.scm (emacs-calibredb)[arguments]: Use G-expressions and SEARCH-INPUT-FILE.
| -rw-r--r-- | gnu/packages/emacs-xyz.scm | 23 |
1 files changed, 12 insertions, 11 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 71411de425..152ac4e0f7 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -26630,17 +26630,18 @@ all of your projects, then override or add variables on a per-project basis.") (base32 "1l30s3wv21mpybbxni5fziq2awai9k60i87s6fid56hg262r7jp0")))) (build-system emacs-build-system) (arguments - '(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch-paths - (lambda* (#:key inputs #:allow-other-keys) - (let ((calibre (assoc-ref inputs "calibre"))) - (make-file-writable "calibredb-core.el") - (emacs-substitute-variables "calibredb-core.el" - ("calibredb-program" - (string-append calibre "/bin/calibredb")) - ("calibredb-fetch-metadata-program" - (string-append calibre "/bin/fetch-ebook-metadata"))))))))) + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-paths + (lambda* (#:key inputs #:allow-other-keys) + (make-file-writable "calibredb-core.el") + (let ((calibredb (search-input-file inputs "/bin/calibredb")) + (fetch-ebook-metadata + (search-input-file inputs "/bin/fetch-ebook-metadata"))) + (emacs-substitute-variables "calibredb-core.el" + ("calibredb-fetch-metadata-program" fetch-ebook-metadata) + ("calibredb-program" calibredb)))))))) (inputs (list calibre)) (propagated-inputs |