mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-18 13:36:36 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

channels: Adjust tests for new #:verify-certificate? parameter.

Browse source 
This is a followup to 9544a04411.

* tests/channels.scm ("latest-channel-instances includes channel dependencies")
("latest-channel-instances excludes duplicate channel dependencies"):
Add #:verify-certificate? parameter to ‘update-cached-checkout’ mock.

Change-Id: Ia795b965c564e5552525327d1d748635dc66d5fd
This commit is contained in:
Ludovic Courtès 2024-12-30 10:53:22 +01:00
parent bdde278dc9
commit 121e96dca2
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/channels.scm
View file

@ -154,7 +154,7 @@ (define channel-metadata-dependencies
(url "test"))) (url "test")))
(test-dir (channel-instance-checkout instance--simple))) (test-dir (channel-instance-checkout instance--simple)))
(mock ((guix git) update-cached-checkout (mock ((guix git) update-cached-checkout
(lambda* (url #:key ref starting-commit) (lambda* (url #:key ref starting-commit verify-certificate?)
(match url (match url
("test" (values test-dir "caf3cabba9e" #f)) ("test" (values test-dir "caf3cabba9e" #f))
(_ (values (channel-instance-checkout instance--no-deps) (_ (values (channel-instance-checkout instance--no-deps)
@ -173,7 +173,7 @@ (define channel-metadata-dependencies
(url "test"))) (url "test")))
(test-dir (channel-instance-checkout instance--with-dupes))) (test-dir (channel-instance-checkout instance--with-dupes)))
(mock ((guix git) update-cached-checkout (mock ((guix git) update-cached-checkout
(lambda* (url #:key ref starting-commit) (lambda* (url #:key ref starting-commit verify-certificate?)
(match url (match url
("test" (values test-dir "caf3cabba9e" #f)) ("test" (values test-dir "caf3cabba9e" #f))
(_ (values (channel-instance-checkout instance--no-deps) (_ (values (channel-instance-checkout instance--no-deps)