gnu: emacs: Adjust 'tramp-remote-path' for remote GuixSD machines.
* gnu/packages/emacs.scm (emacs)[source](snippet): Patch 'net/tramp-sh.el'.
This commit is contained in:
parent
8fd6850436
commit
dc7010911d
|
@ -110,7 +110,18 @@
|
||||||
(find-files "." "loaddefs\\.el$")
|
(find-files "." "loaddefs\\.el$")
|
||||||
;; This is the only "autoloads" file that
|
;; This is the only "autoloads" file that
|
||||||
;; does not have "*loaddefs.el" name.
|
;; does not have "*loaddefs.el" name.
|
||||||
'("eshell/esh-groups.el")))))))
|
'("eshell/esh-groups.el")))
|
||||||
|
|
||||||
|
;; Make sure Tramp looks for binaries in the right places on
|
||||||
|
;; remote GuixSD machines, where 'getconf PATH' returns
|
||||||
|
;; something bogus.
|
||||||
|
(substitute* "net/tramp-sh.el"
|
||||||
|
;; Patch the line after "(defcustom tramp-remote-path".
|
||||||
|
(("\\(tramp-default-remote-path")
|
||||||
|
(format #f "(tramp-default-remote-path ~s ~s ~s ~s "
|
||||||
|
"~/.guix-profile/bin" "~/.guix-profile/sbin"
|
||||||
|
"/run/current-system/profile/bin"
|
||||||
|
"/run/current-system/profile/sbin")))))))
|
||||||
(build-system glib-or-gtk-build-system)
|
(build-system glib-or-gtk-build-system)
|
||||||
(arguments
|
(arguments
|
||||||
`(#:phases
|
`(#:phases
|
||||||
|
|
Loading…
Reference in New Issue