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.
This commit is contained in:
Nicolas Goaziou 2022-10-21 10:10:46 +02:00
parent 6b915fe58b
commit 98c4f0135c
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D

View file

@ -33525,12 +33525,12 @@ (define-public emacs-org-cliplink
#: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