gnu: emacs-rg: Improve package style.

* gnu/packages/emacs-xyz.scm (emacs-rg)[arguments]: Use G-expressions and MAKE-FILE-WRITABLE.
This commit is contained in:
Nicolas Goaziou 2022-07-04 15:33:15 +02:00
parent 30f8183b9a
commit 44b832d719
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D

View file

@ -5060,15 +5060,16 @@ (define-public emacs-rg
(base32 "1nxzplpk5cf6hhr2v85bmg68i6am96shi2zq7m83fs96bilhwsp5")))) (base32 "1nxzplpk5cf6hhr2v85bmg68i6am96shi2zq7m83fs96bilhwsp5"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(arguments (arguments
'(#:phases (list
(modify-phases %standard-phases #:phases
(add-after 'unpack 'remove-rg-path #~(modify-phases %standard-phases
;; Remove the path to ripgrep so that it works on remote systems. (add-after 'unpack 'remove-rg-path
(lambda _ ;; Remove the path to ripgrep so that it works on remote systems.
(let ((file "rg.el")) (lambda _
(chmod file #o644) (let ((file "rg.el"))
(emacs-substitute-sexps file (make-file-writable file)
("(defcustom rg-executable" "rg")))))))) (emacs-substitute-sexps file
("(defcustom rg-executable" "rg"))))))))
(propagated-inputs (propagated-inputs
(list emacs-s emacs-transient emacs-wgrep ripgrep)) (list emacs-s emacs-transient emacs-wgrep ripgrep))
(home-page "https://rgel.readthedocs.io/en/latest/") (home-page "https://rgel.readthedocs.io/en/latest/")