summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2023-05-21 14:26:24 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2023-05-21 14:51:02 +0200
commitea34c09bc21c23d1ec7596480183088da4ed7dc7 (patch)
treedb09aed34b0710509a318b1063046896721aa2e8 /gnu
parent03de9b587a51af6e2527c43803be693ec388fdc6 (diff)
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.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/emacs-xyz.scm15
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