diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-10-21 10:10:46 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-10-21 10:10:46 +0200 |
| commit | 98c4f0135cd2cd5e340f81cbd5f716e055a8ea2b (patch) | |
| tree | c040fa975faefe870f8a468a77f5ca9116474a6a | |
| parent | 6b915fe58b452a785ee98529d26d1a576444378a (diff) | |
| download | guix-98c4f0135cd2cd5e340f81cbd5f716e055a8ea2b.tar guix-98c4f0135cd2cd5e340f81cbd5f716e055a8ea2b.tar.gz | |
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.
| -rw-r--r-- | gnu/packages/emacs-xyz.scm | 8 |
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 |