[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#43331: [PATCH] repl: Look for script files in (getcwd).
|
From: |
Ludovic Courtès |
|
Subject: |
bug#43331: [PATCH] repl: Look for script files in (getcwd). |
|
Date: |
Wed, 16 Sep 2020 15:35:55 +0200 |
|
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) |
Hi,
Konrad Hinsen <konrad.hinsen@fastmail.net> skribis:
> * guix/scripts/repl.scm (guix-repl): Replace "." by (getcwd)
> ---
> guix/scripts/repl.scm | 2 +-
> 1 file changed, 1 insertion(+), 1 deletion(-)
>
> diff --git a/guix/scripts/repl.scm b/guix/scripts/repl.scm
> index 3c79e89f8d..80bf1460e9 100644
> --- a/guix/scripts/repl.scm
> +++ b/guix/scripts/repl.scm
> @@ -178,7 +178,7 @@ call THUNK."
> (lambda ()
> (set-program-arguments script)
> (set-user-module)
> - (load-in-vicinity "." (car script)))))
> + (load-in-vicinity (getcwd) (car script)))))
I added a test and a comment and applied.
Thank you!
Ludo’.