aboutsummaryrefslogtreecommitdiff
path: root/gnu/home
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2023-10-21 10:37:53 +0200
committerLudovic Courtès <ludo@gnu.org>2023-10-21 16:00:14 +0200
commite098ba2f499bbddfea50c85058e4077e39b85513 (patch)
treef2bb12b1a9c355fc60fc34e881fe6b7a4f47aeba /gnu/home
parent80c8f5b57aa3699445fab29e0f75f5955e697509 (diff)
downloadguix-e098ba2f499bbddfea50c85058e4077e39b85513.tar
guix-e098ba2f499bbddfea50c85058e4077e39b85513.tar.gz
home: services: Fix regression in generated ‘on-first-login’ script.
Fixes <https://issues.guix.gnu.org/66659>. Fixes a regression introduced in 6b0a32196982a0a2f4dbb59d35e55833a5545ac6. * gnu/home/services.scm (compute-on-first-login-script): Add ‘begin’ around #$@gexps. Reported-by: Nils Landt <nils@landt.email>
Diffstat (limited to 'gnu/home')
-rw-r--r--gnu/home/services.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/home/services.scm b/gnu/home/services.scm
index 651c068f79..282fed74c1 100644
--- a/gnu/home/services.scm
+++ b/gnu/home/services.scm
@@ -435,7 +435,7 @@ activation.")))
;; after complete logout/reboot.
(if (file-exists? xdg-runtime-dir)
(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
;; shouldn't be translated
(warning (G_ "XDG_RUNTIME_DIR doesn't exists, on-first-login script