tests: Adjust pypi test to recent changes.

This is a followup to 00762a4c4c.

* tests/pypi.scm ("pypi->guix-package, no wheel"): Guard against
'error?' instead of 'quit'.
This commit is contained in:
Ludovic Courtès 2022-02-11 23:47:05 +01:00
parent bc1ad69605
commit 0f1cb02362
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -32,6 +32,8 @@ (define-module (test-pypi)
#:use-module ((guix diagnostics) #:select (guix-warning-port))
#:use-module (json)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:use-module (srfi srfi-64)
#:use-module (ice-9 match)
#:use-module (ice-9 optargs))
@ -265,10 +267,8 @@ (define test-metadata-with-extras-jedi "\
hash)
(equal? (pypi->guix-package "foo" #:version "1.0.0")
(pypi->guix-package "foo"))
(catch 'quit
(lambda ()
(pypi->guix-package "foo" #:version "42"))
(const #t))))
(guard (c ((error? c) #t))
(pypi->guix-package "foo" #:version "42"))))
(x
(pk 'fail x #f))))))