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-tramp: Improve package style.

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-tramp)[arguments]<#:phases>: Use
G-expressions.  Use SEARCH-INPUT-FILE.
This commit is contained in:
Nicolas Goaziou 2022-02-07 00:08:32 +01:00
parent 0d4faa8c45
commit 95664bc648
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 12 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -25780,19 +25780,18 @@ well as an option for visually flashing evaluated s-expressions.")
(base32 "1101nb0raiivrv1z4w442688cxj5mpf4h4zxzy6mhirgsbayk91p")))) (base32 "1101nb0raiivrv1z4w442688cxj5mpf4h4zxzy6mhirgsbayk91p"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(arguments (arguments
`(#:emacs ,emacs ;need D-Bus (list
#:emacs emacs ;need D-Bus
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
;; All but one "/bin/" directory refer to remote ;; All but one "/bin/" directory refer to remote
;; environments, which may not be Guix. Do not patch them ;; environments, which may not be Guix. Do not patch them
;; blindly. However, local encoding shell has to be patched. ;; blindly. However, local encoding shell has to be patched.
(replace 'patch-el-files (replace 'patch-el-files
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let ((sh (assoc-ref inputs "bash")) (emacs-substitute-variables "tramp.el"
(file "tramp.el")) ("tramp-encoding-shell"
(emacs-substitute-variables file (search-input-file inputs "/bin/sh"))))))))
("tramp-encoding-shell" (string-append sh "/bin/sh"))))
#t)))))
(inputs (inputs
(list bash)) (list bash))
(home-page "https://savannah.gnu.org/projects/tramp") (home-page "https://savannah.gnu.org/projects/tramp")