~ruther/guix-local: gnu: emacs: Adjust 'tramp-remote-path' for remote GuixSD machines.

dc7010911dd3285fe9089352e92c77501595d100 — Ludovic Courtès 9 years ago 8fd6850

gnu: emacs: Adjust 'tramp-remote-path' for remote GuixSD machines.

* gnu/packages/emacs.scm (emacs)[source](snippet): Patch
'net/tramp-sh.el'.

patch browse .tar.gz

1 files changed, 12 insertions(+), 1 deletions(-)

M gnu/packages/emacs.scm

M gnu/packages/emacs.scm => gnu/packages/emacs.scm +12 -1

@@ 110,7 110,18 @@
                                    (find-files "." "loaddefs\\.el$")
                                    ;; This is the only "autoloads" file that
                                    ;; 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)
     (arguments
      `(#:phases