tests: gexp: Fix test shadowing replacement field.

Fixes a regression introduced in a7c8e68dc51144a6d3981b770aca9c4897fc7c0c.

* tests/gexp.scm (gexp): Rename replacement binding to replacement-pkg in
order to not shadow the replacement field of the package record.

Change-Id: I70ceafc92f52e588b3cac8f74bffa274bf0da352
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Merges: #7846

1 files changed, 7 insertions, 7 deletions

diff --git a/tests/gexp.scm b/tests/gexp.scm
index 1646d48a425..ddb9904fef0 100644
--- a/tests/gexp.scm
+++ b/tests/gexp.scm
@@ -503,16 +503,16 @@
                       (derivation-file-name result)))))
 
 (test-assertm "with-parameters for %graft?"
-  (mlet* %store-monad ((replacement -> (package
-                                         (inherit %bootstrap-guile)
-                                         (name (string-upcase
-                                                (package-name
-                                                 %bootstrap-guile)))))
+  (mlet* %store-monad ((replacement-pkg -> (package
+                                             (inherit %bootstrap-guile)
+                                             (name (string-upcase
+                                                    (package-name
+                                                     %bootstrap-guile)))))
                        (guile -> (package
                                    (inherit %bootstrap-guile)
-                                   (replacement replacement)))
+                                   (replacement replacement-pkg)))
                        (drv0   (package->derivation %bootstrap-guile))
-                       (drv1   (package->derivation replacement))
+                       (drv1   (package->derivation replacement-pkg))
                        (obj0 -> (with-parameters ((%graft? #f))
                                   guile))
                        (obj1 -> (with-parameters ((%graft? #t))