me
/
guix
Archived
1
0
Fork 0
Code

home: services: Fix regression in generated ‘on-first-login’ script. 

Fixes <https://issues.guix.gnu.org/66659>.

Fixes a regression introduced in
6b0a321969.

* gnu/home/services.scm (compute-on-first-login-script): Add ‘begin’
around #$@gexps.

Reported-by: Nils Landt <nils@landt.email>
Ludovic Courtès 2023-10-21 10:37:53 +02:00
parent 80c8f5b57a
commit e098ba2f49
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gnu/home/services.scm
View File

@ -435,7 +435,7 @@ activation.")))
;; after complete logout/reboot. ;; after complete logout/reboot.
(if (file-exists? xdg-runtime-dir) (if (file-exists? xdg-runtime-dir)
(when (claim-first-run flag-file-path) (when (claim-first-run flag-file-path)
#$@gexps) (begin #$@gexps)) ;GEXPS can be empty, hence 'begin'
;; TRANSLATORS: 'on-first-login' is the name of a service and ;; TRANSLATORS: 'on-first-login' is the name of a service and
;; shouldn't be translated ;; shouldn't be translated
(warning (G_ "XDG_RUNTIME_DIR doesn't exists, on-first-login script (warning (G_ "XDG_RUNTIME_DIR doesn't exists, on-first-login script