diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2022-12-31 14:29:54 +0100 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2022-12-31 14:48:46 +0100 |
| commit | 4046405f73da2fb9b89ca4a3ad455b56b3e826aa (patch) | |
| tree | b2015ef0d0d31c4656bd95e9f0a3429fb5934836 /tests/import-utils.scm | |
| parent | 4d139260643106e0160cd5ecc224ce3942f7914c (diff) | |
| download | guix-4046405f73da2fb9b89ca4a3ad455b56b3e826aa.tar.gz | |
tests: import-utils: Ignore extra keyword arguments.
* tests/import-utils.scm ("recursive-import", "recursive-import: skip false
packages (toplevel)", "recursive-import: skip false packages (dependency)"):
Do not try to match all arguments.
Diffstat (limited to 'tests/import-utils.scm')
| -rw-r--r-- | tests/import-utils.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/import-utils.scm b/tests/import-utils.scm index f50f730873..44dff14597 100644 --- a/tests/import-utils.scm +++ b/tests/import-utils.scm @@ -67,12 +67,12 @@ Differences are hard to spot, e.g. in CLOS vs. GOOPS.")) #:repo 'repo #:repo->guix-package (match-lambda* - (("foo" #:version #f #:repo 'repo) + (("foo" #:repo 'repo . rest) (values '(package (name "foo") (inputs `(("bar" ,bar)))) '("bar"))) - (("bar" #:version #f #:repo 'repo) + (("bar" #:repo 'repo . rest) (values '(package (name "bar")) '()))) @@ -84,7 +84,7 @@ Differences are hard to spot, e.g. in CLOS vs. GOOPS.")) #:repo 'repo #:repo->guix-package (match-lambda* - (("foo" #:version #f #:repo 'repo) + (("foo" #:repo 'repo . rest) (values #f '()))) #:guix-name identity)) @@ -96,12 +96,12 @@ Differences are hard to spot, e.g. in CLOS vs. GOOPS.")) #:repo 'repo #:repo->guix-package (match-lambda* - (("foo" #:version #f #:repo 'repo) + (("foo" #:repo 'repo . rest) (values '(package (name "foo") (inputs `(("bar" ,bar)))) '("bar"))) - (("bar" #:version #f #:repo 'repo) + (("bar" #:repo 'repo . rest) (values #f '()))) #:guix-name identity)) |