From b66d6d52ccaef0ffc660df9077500ca52e3ab35f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Tue, 8 Nov 2016 23:31:36 +0100 Subject: [PATCH] tests: Fix 'fold-packages' for hidden packages. * tests/packages.scm ("fold-packages, hidden package"): Expect GUILE-2.0, not GUILE-2.0/FIXED. This is a followup to c62a31ca802c2b225279c4b0360a4cfc2723ad28. --- tests/packages.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/packages.scm b/tests/packages.scm index 5f5fb5de87..47e76b53e9 100644 --- a/tests/packages.scm +++ b/tests/packages.scm @@ -909,7 +909,7 @@ (test-assert "fold-packages, hidden package" ;; There are two public variables providing "guile@2.0" ('guile-final' in - ;; commencement.scm and 'guile-2.0/fixed' in guile.scm), but only the latter + ;; commencement.scm and 'guile-2.0' in guile.scm), but only the latter ;; should show up. (match (fold-packages (lambda (p r) (if (and (string=? (package-name p) "guile") @@ -919,7 +919,7 @@ r)) '()) ((one) - (eq? one guile-2.0/fixed)))) + (eq? one guile-2.0)))) (test-assert "find-packages-by-name" (match (find-packages-by-name "hello")