[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#58273] [PATCH] installer: checks the availability of the mirror
From: |
Mathieu Othacehe |
Subject: |
[bug#58273] [PATCH] installer: checks the availability of the mirror |
Date: |
Mon, 17 Oct 2022 09:39:34 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/28.1 (gnu/linux) |
Hello Andrew,
>> + (false-if-exception
>> + (= (response-code
>> + (http-request "https://ci.guix.gnu.org"))
>> + 200))
>> + (false-if-exception
>> + (= (response-code
>> + (http-request "https://bordeaux.guix.gnu.org"))
>> + 200))))
Thanks for taking care of this patch. I think the following part could
be factorized:
(define (url-alive? url)
(false-if-exception
(= (response-code
(http-request url))
200)))
also, the indentation is wrong. Could you please fix it?
Thanks,
Mathieu