ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 07:26:13 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Adjust pypi test to recent changes.

Browse source 
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
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
tests/pypi.scm
View file

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