~ruther/guix-local

b66d6d52ccaef0ffc660df9077500ca52e3ab35f — Ludovic Courtès 9 years ago 946465b
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.
1 files changed, 2 insertions(+), 2 deletions(-)

M tests/packages.scm
M tests/packages.scm => tests/packages.scm +2 -2
@@ 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")