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

@ -420,9 +420,9 @@ (define* (file-if-not-empty field #:optional (extra-content #f))
(not (null? ((configuration-field-getter field-obj) config))))
`(,(object->snake-case-string file-name)
,(apply mixed-text-file
(object->snake-case-string file-name)
(cons (serialize-field field)
(if extra-content extra-content '()))))
(object->snake-case-string file-name)
(append (or extra-content '())
(list (serialize-field field)))))
'())))
(filter