unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
* [bug#56781] [PATCH] home: Add explicit dependency on env to activation script.
@ 2022-07-26 10:10 Andrew Tropin
  2022-08-02  8:54 ` 宋文武 via Guix-patches via
  0 siblings, 1 reply; 3+ messages in thread
From: Andrew Tropin @ 2022-07-26 10:10 UTC (permalink / raw)
  To: 56781

[-- Attachment #1: Type: text/plain, Size: 1417 bytes --]


* gnu/home/services.scm (compute-activation-script): Add explicit dependency
on env to activation script.
---
 gnu/home/services.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/home/services.scm b/gnu/home/services.scm
index d500ba8c68..61a7419f4e 100644
--- a/gnu/home/services.scm
+++ b/gnu/home/services.scm
@@ -20,6 +20,7 @@
 (define-module (gnu home services)
   #:use-module (gnu services)
   #:use-module ((gnu packages package-management) #:select (guix))
+  #:use-module ((gnu packages base) #:select (coreutils))
   #:use-module (guix channels)
   #:use-module (guix monads)
   #:use-module (guix store)
@@ -427,8 +428,9 @@ (define (compute-activation-script init-gexp gexps)
                               #f))))
        (if (file-exists? (he-init-file new-home))
            (let* ((port   ((@ (ice-9 popen) open-input-pipe)
-                           (format #f "source ~a && env -0"
-                                   (he-init-file new-home))))
+                           (format #f "source ~a && ~a -0"
+                                   (he-init-file new-home)
+                                   #$(file-append coreutils "/bin/env"))))
                   (result ((@ (ice-9 rdelim) read-delimited) "" port))
                   (vars (map (lambda (x)
                                (let ((si (string-index x #\=)))
-- 
2.37.0


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

^ permalink raw reply related	[flat|nested] 3+ messages in thread

* [bug#56781] [PATCH] home: Add explicit dependency on env to activation script.
  2022-07-26 10:10 [bug#56781] [PATCH] home: Add explicit dependency on env to activation script Andrew Tropin
@ 2022-08-02  8:54 ` 宋文武 via Guix-patches via
  2022-08-02 14:35   ` bug#56781: " Andrew Tropin
  0 siblings, 1 reply; 3+ messages in thread
From: 宋文武 via Guix-patches via @ 2022-08-02  8:54 UTC (permalink / raw)
  To: Andrew Tropin; +Cc: 56781-done

Andrew Tropin <andrew@trop.in> writes:

> * gnu/home/services.scm (compute-activation-script): Add explicit dependency
> on env to activation script.

Pushed, thanks!




^ permalink raw reply	[flat|nested] 3+ messages in thread

* bug#56781: [PATCH] home: Add explicit dependency on env to activation script.
  2022-08-02  8:54 ` 宋文武 via Guix-patches via
@ 2022-08-02 14:35   ` Andrew Tropin
  0 siblings, 0 replies; 3+ messages in thread
From: Andrew Tropin @ 2022-08-02 14:35 UTC (permalink / raw)
  To: 宋文武; +Cc: 56781-done

[-- Attachment #1: Type: text/plain, Size: 283 bytes --]

On 2022-08-02 16:54, 宋文武 wrote:

> Andrew Tropin <andrew@trop.in> writes:
>
>> * gnu/home/services.scm (compute-activation-script): Add explicit dependency
>> on env to activation script.
>
> Pushed, thanks!

Thank you very much!

-- 
Best regards,
Andrew Tropin

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2022-08-02 20:29 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-07-26 10:10 [bug#56781] [PATCH] home: Add explicit dependency on env to activation script Andrew Tropin
2022-08-02  8:54 ` 宋文武 via Guix-patches via
2022-08-02 14:35   ` bug#56781: " Andrew Tropin

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).