summary refs log tree commit diff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/union.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/union.scm b/tests/union.scm
index 87450d74fd..9816882101 100644
--- a/tests/union.scm
+++ b/tests/union.scm
@@ -94,9 +94,10 @@
   (let* ((inputs  (map (match-lambda
                         ((name package)
                          `(,name ,(package-derivation %store package))))
-                       (delete-duplicates %bootstrap-inputs
-                                          (lambda (i1 i2)
-                                            (eq? (second i1) (second i2))))))
+
+                       ;; Purposefully leave duplicate entries.
+                       (append %bootstrap-inputs
+                               (take %bootstrap-inputs 3))))
          (builder `(begin
                      (use-modules (guix build union))
                      (union-build (assoc-ref %outputs "out")