diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2024-11-25 17:43:56 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2024-12-01 20:14:15 +0100 |
| commit | da9c3195edb22f9e5acabeb95da41331cc4ab4ba (patch) | |
| tree | 3192816e043743cb32e65e1e7529a87dd1731c78 | |
| parent | 6b14eb3402034531bc7d9b70f273ca1a66e42d4b (diff) | |
| download | guix-da9c3195edb22f9e5acabeb95da41331cc4ab4ba.tar.gz guix-da9c3195edb22f9e5acabeb95da41331cc4ab4ba.zip | |
import: gnome: Keep going upon HTTP errors.
* guix/import/gnome.scm (import-gnome-release): Do not re-raise
condition C, emit a warning instead.
Change-Id: I9a7c337a17d1f7ed4677398e7b0f383befca7d74
| -rw-r--r-- | guix/import/gnome.scm | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/guix/import/gnome.scm b/guix/import/gnome.scm index 054ae44f7a..3ba8ae02e5 100644 --- a/guix/import/gnome.scm +++ b/guix/import/gnome.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2017, 2019, 2021 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2017, 2019, 2021, 2024 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com> ;;; Copyright © 2022 Hartmut Goebel <h.goebel@crazy-compilers.com> ;;; @@ -23,6 +23,8 @@ #:use-module (guix utils) #:use-module (guix packages) #:use-module (guix http-client) + #:use-module (guix diagnostics) + #:use-module (guix i18n) #:use-module (json) #:use-module (srfi srfi-1) #:use-module (srfi srfi-34) @@ -111,9 +113,12 @@ https://discourse.gnome.org/t/new-gnome-versioning-scheme/4235" releases)) (guard (c ((http-get-error? c) - (if (= 404 (http-get-error-code c)) - #f - (raise c)))) + (unless (= 404 (http-get-error-code c)) + (warning (G_ "failed to download from '~a': ~a (~s)~%") + (uri->string (http-get-error-uri c)) + (http-get-error-code c) + (http-get-error-reason c))) + #f)) (let* ((port (http-fetch/cached (string->uri (string-append "https://ftp.gnome.org/pub/gnome/sources/" |