diff options
| author | Florian Pelz <pelzflorian@pelzflorian.de> | 2022-02-12 12:47:56 +0100 |
|---|---|---|
| committer | Florian Pelz <pelzflorian@pelzflorian.de> | 2022-02-26 15:56:55 +0100 |
| commit | cc11905568065409fe46487174e1cf404291bda1 (patch) | |
| tree | 0d73740e0b6ec2addcabea3337f0282a7ed5e78a /gnu/installer/connman.scm | |
| parent | e1a4770fb07cfcea7c0c03d880ac253167a24d6d (diff) | |
| download | guix-cc11905568065409fe46487174e1cf404291bda1.tar guix-cc11905568065409fe46487174e1cf404291bda1.tar.gz | |
installer: Continue even if Connman cannot phone home.
Connman's online check is unreliable for me.
* gnu/installer/connman.scm (connman-online?): Accept if
connman state is ready instead of online.
Diffstat (limited to 'gnu/installer/connman.scm')
| -rw-r--r-- | gnu/installer/connman.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/installer/connman.scm b/gnu/installer/connman.scm index 2f33b58453..d21272036f 100644 --- a/gnu/installer/connman.scm +++ b/gnu/installer/connman.scm @@ -287,7 +287,7 @@ list so that each keys of a given technology are gathered in a separate list." (define (connman-online?) (let ((state (connman-state))) - (eq? state 'online))) + (memq state '(ready online)))) (define (connman-connect-with-auth service password-proc) "Connect to the given SERVICE with the password returned by calling |