summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2022-10-21 10:10:46 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2022-10-21 10:10:46 +0200
commit98c4f0135cd2cd5e340f81cbd5f716e055a8ea2b (patch)
treec040fa975faefe870f8a468a77f5ca9116474a6a /gnu
parent6b915fe58b452a785ee98529d26d1a576444378a (diff)
gnu: emacs-org-cliplink: Improve a phase.
* gnu/packages/emacs-xyz.scm (emacs-org-cliplink)[arguments]<#:phases>: Fix phase name. Clarify substitution done in the phase.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/emacs-xyz.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 0acede2da4..eef7b54777 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -33525,12 +33525,12 @@ the buffer you want to undo. An undo tree buffer should pop up.")
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
- (add-after 'unpack 'patch-geiser-racket-binary
+ (add-after 'unpack 'patch-curl-executable
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "org-cliplink-transport.el"
- (("curl\")")
- (string-append (search-input-file inputs "bin/curl")
- "\")"))))))))
+ (("\\(executable-find \"curl\"\\)")
+ (let ((curl (search-input-file inputs "/bin/curl")))
+ (string-append "\"" curl "\"")))))))))
(native-inputs
(list emacs-el-mock emacs-ert-runner emacs-undercover))
(inputs