mirror of
https://codeberg.org/guix/guix.git
synced 2026-01-25 03:55:08 -06:00
installer: wait-service-online: Allow user to proceed if offline.
The user may choose to proceed with installation even if they seem to be offline. This is mostly for cases where the user if actually online, but the gnu and guix infrastructure is down. On top of that, if the installer has all the necessary dependencies the user might not need internet at all. * gnu/installer/newt/network.scm (wait-oservice-online): Add choice window for user to continue if offline. Change-Id: Id8868ad42a6874d31b64765457f8a3d3b08ebd6c Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
55584781e9
commit
0b35df4c8b
1 changed files with 9 additions and 5 deletions
|
|
@ -155,11 +155,15 @@ FULL-VALUE tentatives, spaced by 1 second."
|
|||
full-value
|
||||
(+ value 1))))
|
||||
(unless (online?)
|
||||
(run-error-page
|
||||
(G_ "The selected network does not provide access to the \
|
||||
Internet and the Guix substitute server, please try again.")
|
||||
(G_ "Connection error"))
|
||||
(abort-to-prompt 'installer-step 'abort))))
|
||||
(case (choice-window
|
||||
(G_ "Internet access")
|
||||
(G_ "Continue")
|
||||
(G_ "Try again?")
|
||||
(G_ "
|
||||
The selected network does not seem to provide access to the \
|
||||
Internet. The install process requires Internet access. \
|
||||
Do you want to continue anyway?"))
|
||||
((2) (abort-to-prompt 'installer-step 'abort))))))
|
||||
|
||||
(define (run-network-page)
|
||||
"Run a page to allow the user to configure connman so that it can access the
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue