Hi Marius, Marius Bakke <[email protected]> skribis:
> test-name: fold-available-packages with/without cache > location: > /tmp/guix-build-guix-1.0.1-7.fc1fe72.drv-0/source/tests/packages.scm:1110 > source: > + (test-assert > + "fold-available-packages with/without cache" > + (let () > + (define no-cache > + (fold-available-packages > + (lambda* (name version result #:rest rest) > + (cons (cons* name version rest) result)) > + '())) > + (define from-cache > + (call-with-temporary-directory > + (lambda (cache) > + (generate-package-cache cache) > + (mock ((guix describe) current-profile (const cache)) > + (mock ((gnu packages) > + cache-is-authoritative? > + (const #t)) > + (fold-available-packages > + (lambda* (name version result #:rest rest) > + (cons (cons* name version rest) result)) > + '())))))) > + (and (equal? > + (delete-duplicates from-cache) > + from-cache) > + (lset= equal? no-cache from-cache)))) > actual-value: #f > result: FAIL Oops! Commit 88da011592a679776088b64b8d11575563c3f867 fixes it. I’m testing ‘guix’ packages updated to that commit and will push tomorrow if everything goes well and nobody beats me at it. Thanks, Ludo’.
