amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: emacs-deadgrep: Improve package style.

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-deadgrep)[arguments]: Use G-expressions.
<#:phases>: Use SEARCH-INPUT-FILE instead of ASSOC-REF.
This commit is contained in:
Nicolas Goaziou 2022-11-06 22:32:32 +01:00
parent b53355f08d
commit ab6fb3022d
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 13 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

21
gnu/packages/emacs-xyz.scm
View file

@ -23875,22 +23875,21 @@ accept and reject GitHub pull requests.")
(base32 (base32
"0bwf8gsqw7hsmacqd34piwgv066ijfclmxaigkvhvpac0lpsmi79")))) "0bwf8gsqw7hsmacqd34piwgv066ijfclmxaigkvhvpac0lpsmi79"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(inputs (list ripgrep))
(propagated-inputs
(list emacs-dash emacs-s emacs-spinner))
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'configure (add-after 'unpack 'configure
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let ((ripgrep (assoc-ref inputs "ripgrep"))) (let ((ripgrep (search-input-file inputs "/bin/rg")))
;; .el is read-only in git. ;; Specify the absolute file name of rg so that everything
(make-file-writable "deadgrep.el")
;; Specify the absolute file names of rg so that everything
;; works out-of-the-box. ;; works out-of-the-box.
(emacs-substitute-variables "deadgrep.el" (emacs-substitute-variables "deadgrep.el"
("deadgrep-executable" ("deadgrep-executable" ripgrep))))))))
(string-append ripgrep "/bin/rg"))))))))) (inputs
(list ripgrep))
(propagated-inputs
(list emacs-dash emacs-s emacs-spinner))
(home-page "https://github.com/Wilfred/deadgrep") (home-page "https://github.com/Wilfred/deadgrep")
(synopsis "Frontend for @code{ripgrep}") (synopsis "Frontend for @code{ripgrep}")
(description "This package provides an Emacs interface for performing (description "This package provides an Emacs interface for performing