diff mbox series

[bug#55081,v2] Allow Guix root-dir overrides when working via Tramp.

Message ID 5eb3a6b7718bb1f3959afd27f051f744c9d677f6.1653160223.git.bjc@spork.org
State New
Headers show
Series [bug#55081,v2] Allow Guix root-dir overrides when working via Tramp. | expand

Checks

Context Check Description
cbaines/comparison success View comparision
cbaines/git branch success View Git branch
cbaines/applying patch success View Laminar job
cbaines/issue success View issue

Commit Message

Brian Cully May 21, 2022, 7:10 p.m. UTC
From: Brian Cully <bjc@kublai.com>

Add only the local part of the root directory to the guile search
path. This lets you use Tramp to hack on a remote Guix checkout.
---
I think my last patch was mangled by GNUS, so I'm resending it.

FWIW, I've been using this for months without issue.
 .dir-locals.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

Comments

Leo Famulari March 5, 2023, 7:06 p.m. UTC | #1
On Sat, May 21, 2022 at 03:10:24PM -0400, Brian Cully via Guix-patches via wrote:
> From: Brian Cully <bjc@kublai.com>
> 
> Add only the local part of the root directory to the guile search
> path. This lets you use Tramp to hack on a remote Guix checkout.
> ---
> I think my last patch was mangled by GNUS, so I'm resending it.
> 
> FWIW, I've been using this for months without issue.

Okay, pushed as cedf97ed6ee4eba8c39bfe6cc0efe33fcb977ccf

Thanks!
diff mbox series

Patch

diff --git a/.dir-locals.el b/.dir-locals.el
index 09e19223d5..3b75989133 100644
--- a/.dir-locals.el
+++ b/.dir-locals.el
@@ -29,7 +29,7 @@ 
                ;; Hence the following "when", which might otherwise be unnecessary;
                ;; it prevents causing an error when root-dir-unexpanded is nil.
                (when root-dir-unexpanded
-                 (let* ((root-dir (expand-file-name root-dir-unexpanded))
+                 (let* ((root-dir (file-local-name (expand-file-name root-dir-unexpanded)))
                         ;; Workaround for bug https://issues.guix.gnu.org/43818.
                         (root-dir* (directory-file-name root-dir)))