diff options
author | Rostislav Svoboda <Rostislav.Svoboda@gmail.com> | 2023-10-24 16:08:10 +0200 |
---|---|---|
committer | Clément Lassieur <clement@lassieur.org> | 2023-10-27 16:51:58 +0200 |
commit | 2de30042674197fe451c220745186e36465d06e2 (patch) | |
tree | 16391a7c0c55d49aa5a8262c69e9010ac91bc32a /gnu | |
parent | 2ff8de3657a5c9d0abf67bb4705251b23d97702e (diff) |
home: services: Fix regression in generated ‘on-first-login’ script.
Fixes <https://issues.guix.gnu.org/66659>.
Fixes a regression introduced in 6b0a32196982a0a2f4dbb59d35e55833a5545ac6. The
first attempt in e098ba2f499bbddfea50c85058e4077e39b85513 to fix this issue didn't work.
* gnu/home/services.scm (compute-on-first-login-script): Add
‘begin *unspecified*’ around #$@gexps.
Change-Id: I14339ad684ffe93e692e507b57dcd221d96210ef
Signed-off-by: Clément Lassieur <clement@lassieur.org>
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/home/services.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gnu/home/services.scm b/gnu/home/services.scm index 282fed74c1..44f585aff5 100644 --- a/gnu/home/services.scm +++ b/gnu/home/services.scm @@ -435,7 +435,10 @@ activation."))) ;; after complete logout/reboot. (if (file-exists? xdg-runtime-dir) (when (claim-first-run flag-file-path) - (begin #$@gexps)) ;GEXPS can be empty, hence 'begin' + ;; GEXPS can be empty, hence 'begin *unspecified*'. Having just + ;; 'begin' without '*unspecified*' leads to + ;; "Syntax error: ... sequence of zero expressions in form (begin)" + (begin *unspecified* #$@gexps)) ;; 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 |