Subject: bug#66659: closed (Re: bug#66659: (home-)on-first-login script broken when no gexps are added)

From: [email-masked] (GNU bug Tracking System)
Date: Fri, 27 Oct 2023 14:55:02 +0000

Your bug report

#66659: (home-)on-first-login script broken when no gexps are added

which was filed against the guix package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
66659: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=66659
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: bug#66659: (home-)on-first-login script broken when no gexps are added
From: Clément Lassieur <[email-masked]>
To: Rostislav Svoboda <[email-masked]>
Cc: [email-masked]
Date: Fri, 27 Oct 2023 16:53:27 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

On Tue, Oct 24 2023, Rostislav Svoboda wrote:

>> > I've just pushed something similar to what you provided, Carlo, in
>> > commit e098ba2f499bbddfea50c85058e4077e39b85513.
>> >
>> > We should be good now.
>>
>> I'm afraid this did not fix the issue. It results in
>> (when (claim-first-run flag-file-path) (begin))
>>
>> which leads to the new error message "Syntax error:
>> /home/nl/.guix-home/on-first-login:3:1272: sequence of zero expressions in form (begin)"
>
> Adding *unspecified* works for me. I.e.:
>
>     (when (claim-first-run flag-file-path)
>       ;; 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))
>
> The patch is in the attachment.
>
> Cheers Bost

Applied as 2de30042674197fe451c220745186e36465d06e2, thanks!
Clément

Subject: (home-)on-first-login script broken when no gexps are added
From: Nils Landt <[email-masked]>
To: "[email-masked]" <[email-masked]>
Date: Sat, 21 Oct 2023 08:14:05 +0200 (CEST)
List-Id: <debbugs-submit.debbugs.gnu.org>

Error message:

ice-9/psyntax.scm:2824:12: In procedure syntax-violation:
Syntax error:
/home/nl/.guix-home/on-first-login:3:1233: source expression failed to match any pattern in form (when (claim-first-run flag-file-path))

As you can see, there is no body in the "when" expression.

Code in gnu/home/services.scm:438 :

          (if (file-exists? xdg-runtime-dir)
              (when (claim-first-run flag-file-path)
                #$@gexps)

In my case, it appears that gexps is empty, resulting in the invalid syntax.

Broken by b92235ea8b06e304072bad55ae006593ea673568