home: services: bash: Emit 'extra-content' first again.

Fixes a regression introduced in
4b96998292 that would less to a
'tests/guix-home.sh' failure.

* gnu/home/services/shells.scm (add-bash-configuration)[file-if-not-empty]:
Move EXTRA-CONTENT first.
This commit is contained in:
Ludovic Courtès 2021-11-16 13:23:08 +01:00
parent e5d8302b2c
commit c322d97832
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -421,8 +421,8 @@ (define* (file-if-not-empty field #:optional (extra-content #f))
`(,(object->snake-case-string file-name) `(,(object->snake-case-string file-name)
,(apply mixed-text-file ,(apply mixed-text-file
(object->snake-case-string file-name) (object->snake-case-string file-name)
(cons (serialize-field field) (append (or extra-content '())
(if extra-content extra-content '())))) (list (serialize-field field)))))
'()))) '())))
(filter (filter