Message ID | 877dd7p3vy.fsf@trop.in |
---|---|
State | Accepted |
Headers | show |
Series | [bug#51915] home: services: Change computed-file to scheme-file. | expand |
Context | Check | Description |
---|---|---|
cbaines/applying patch | fail | View Laminar job |
cbaines/issue | success | View issue |
Hi, Andrew Tropin <andrew@trop.in> skribis: > --- a/gnu/home/services.scm > +++ b/gnu/home/services.scm > @@ -275,7 +275,7 @@ (define home-files-service-type > will be put in @file{~/.guix-home/files}."))) > > (define (compute-on-first-login-script _ gexps) > - (computed-file > + (scheme-file > "on-first-login" This was fixed in e5d8302b2ce596a0518ea5bd79b338f68a3246eb (with ‘program-file’.) Apologies for the mistake. Thanks, Ludo’.
On 2021-11-18 09:39, Ludovic Courtès wrote: > Hi, > > Andrew Tropin <andrew@trop.in> skribis: > >> --- a/gnu/home/services.scm >> +++ b/gnu/home/services.scm >> @@ -275,7 +275,7 @@ (define home-files-service-type >> will be put in @file{~/.guix-home/files}."))) >> >> (define (compute-on-first-login-script _ gexps) >> - (computed-file >> + (scheme-file >> "on-first-login" > > This was fixed in e5d8302b2ce596a0518ea5bd79b338f68a3246eb (with > ‘program-file’.) Apologies for the mistake. Thank you very much for the fix! :) > > Thanks, > Ludo’.
diff --git a/gnu/home/services.scm b/gnu/home/services.scm index 992e522fa2..0deaadaf3e 100644 --- a/gnu/home/services.scm +++ b/gnu/home/services.scm @@ -275,7 +275,7 @@ (define home-files-service-type will be put in @file{~/.guix-home/files}."))) (define (compute-on-first-login-script _ gexps) - (computed-file + (scheme-file "on-first-login" #~(let* ((xdg-runtime-dir (or (getenv "XDG_RUNTIME_DIR") (format #f "/run/user/~a" (getuid))))