diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-10-16 02:00:03 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-10-16 02:00:28 +0200 |
| commit | 9a0a786c2555b7e9bcef2a27dff8b82c002799ab (patch) | |
| tree | 7d654e5a663218e8779feb9ddc53a764f53dcba7 | |
| parent | 88ec7bf616a5d2559d1203331f2129601b082110 (diff) | |
guix-install.sh: Time out fetching OpenPGP keys.
The default 900s provide no useful backstop in interactive use.
* etc/guix-install.sh (chk_gpg_keyring): Add a 30s wget --timeout.
| -rwxr-xr-x | etc/guix-install.sh | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/etc/guix-install.sh b/etc/guix-install.sh index 3604c71ed6b..3fad9deb1fd 100755 --- a/etc/guix-install.sh +++ b/etc/guix-install.sh | |||
| @@ -141,8 +141,10 @@ chk_gpg_keyring() | |||
| 141 | if prompt_yes_no "${INF}The following OpenPGP public key is \ | 141 | if prompt_yes_no "${INF}The following OpenPGP public key is \ |
| 142 | required to verify the Guix binary signature: $gpg_key_id. | 142 | required to verify the Guix binary signature: $gpg_key_id. |
| 143 | Would you like me to fetch it for you?"; then | 143 | Would you like me to fetch it for you?"; then |
| 144 | # Use a reasonable time-out here so users don't report silent | ||
| 145 | # ‘freezes’ when Savannah goes out to lunch, as has happened. | ||
| 144 | wget "https://sv.gnu.org/people/viewgpg.php?user_id=$user_id" \ | 146 | wget "https://sv.gnu.org/people/viewgpg.php?user_id=$user_id" \ |
| 145 | --no-verbose -O- | gpg --import - | 147 | --timeout=30 --no-verbose -O- | gpg --import - |
| 146 | else | 148 | else |
| 147 | _err "${ERR}Missing OpenPGP public key ($gpg_key_id). | 149 | _err "${ERR}Missing OpenPGP public key ($gpg_key_id). |
| 148 | Fetch it with this command: | 150 | Fetch it with this command: |
