diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2023-05-21 14:26:24 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2023-05-21 14:51:02 +0200 |
| commit | ea34c09bc21c23d1ec7596480183088da4ed7dc7 (patch) | |
| tree | db09aed34b0710509a318b1063046896721aa2e8 | |
| parent | 03de9b587a51af6e2527c43803be693ec388fdc6 (diff) | |
| download | guix-ea34c09bc21c23d1ec7596480183088da4ed7dc7.tar guix-ea34c09bc21c23d1ec7596480183088da4ed7dc7.tar.gz | |
gnu: emacs-org-inline-pdf: Improve package style.
* gnu/packages/emacs-xyz.scm (emacs-org-inline-pdf)[arguments]: Use
G-expressions. Use SEARCH-INPUT-FILE.
| -rw-r--r-- | gnu/packages/emacs-xyz.scm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 4f86cdc55a..d1809e8221 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -6884,13 +6884,14 @@ allrecipes.com.") (inputs (list pdf2svg)) (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch-exec-paths - (lambda* (#:key inputs #:allow-other-keys) - (let ((pdf2svg (assoc-ref inputs "pdf2svg"))) - (substitute* "org-inline-pdf.el" - (("\"pdf2svg\"") (string-append "\"" pdf2svg "/bin/pdf2svg\""))))))))) + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-exec-paths + (lambda* (#:key inputs #:allow-other-keys) + (let ((pdf2svg (search-input-file inputs "/bin/pdf2svg"))) + (substitute* "org-inline-pdf.el" + (("\"pdf2svg\"") (string-append "\"" pdf2svg "\""))))))))) (home-page "https://github.com/shg/org-inline-pdf.el") (synopsis "Inline PDF previewing for Org") (description "This package provides a minor mode that enables |