gexp: Fix expansion for (file-append (local-file ...) ...).
authorLudovic Courtès <ludo@gnu.org>
Mon, 25 May 2020 14:06:03 +0000 (16:06 +0200)
committerLudovic Courtès <ludo@gnu.org>
Mon, 25 May 2020 21:00:30 +0000 (23:00 +0200)
commitabf43d4511566e97f09049aa8b29453a2ed5ed16
tree8d53e34d2f04d3ec6da2a11e8a97bcbc922e12fa
parente033700f17660ff936936cf89cc557b95d12bb13
gexp: Fix expansion for (file-append (local-file ...) ...).

Fixes <https://bugs.gnu.org/41527>.
Regression introduced in d03001a31a6d460b712825640dba11e3f1a53a14.

* guix/gexp.scm (lower+expand-object): When LOWERED is not a struct and
EXPAND is true, call EXPAND.
* tests/gexp.scm ("file-append, raw store item"): New test.
guix/gexp.scm
tests/gexp.scm