tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00
Code Activity

installer: Respect /tmp/installer-assume-online in check-substitute-availability.

Browse Source 
Follow up of #2518, where check-substitute-availability has been introduced.

This is mostly for system tests that run without internet access.

* gnu/installer/newt/network.scm (check-substitute-availability): Skip the
check if /tmp/installer-assume-online exists.

Change-Id: I0110390e8c5ce6756f3c22cb770011ea735fe79b
Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
This commit is contained in:
Rutherther
2025-10-18 18:54:08 +02:00
committed by Efraim Flashner
parent 11e0594e63
commit 344bf876f6
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
gnu/installer/newt/network.scm
View File

@@ -168,10 +168,12 @@ Do you want to continue anyway?"))
(define (check-substitute-availability)
"Check that at least one of the Guix substitute servers is available."
(define (substitutes-available?)
(common-urls-alive?
(list
"https://bordeaux.guix.gnu.org/nix-cache-info"
"https://ci.guix.gnu.org/nix-cache-info")))
(or
(file-exists? "/tmp/installer-assume-online")
(common-urls-alive?
(list
"https://bordeaux.guix.gnu.org/nix-cache-info"
"https://ci.guix.gnu.org/nix-cache-info"))))
(let* ((full-value 5))
(run-scale-page