From patchwork Fri Apr 16 21:11:39 2021 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: Philip McGrath X-Patchwork-Id: 28596 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id 1D19527BC77; Fri, 16 Apr 2021 23:22:31 +0100 (BST) X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-2.8 required=5.0 tests=BAYES_00,DKIM_SIGNED, MAILING_LIST_MULTI,RCVD_IN_MSPIKE_H4,RCVD_IN_MSPIKE_WL,SPF_HELO_PASS, T_DKIM_INVALID,URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.2 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id 9558127BC6C for ; Fri, 16 Apr 2021 23:22:30 +0100 (BST) Received: from localhost ([::1]:49864 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lXWr7-0001zG-SN for patchwork@mira.cbaines.net; Fri, 16 Apr 2021 18:22:29 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:47000) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lXVlv-0001KJ-AZ for guix-patches@gnu.org; Fri, 16 Apr 2021 17:13:03 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:58511) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1lXVlv-0006Xh-1Z for guix-patches@gnu.org; Fri, 16 Apr 2021 17:13:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1lXVlu-0004nw-TE for guix-patches@gnu.org; Fri, 16 Apr 2021 17:13:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#47829] [PATCH 4/4] gnu: racket: Add aditional mirrors. Resent-From: Philip McGrath Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Fri, 16 Apr 2021 21:13:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 47829 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 47829@debbugs.gnu.org Cc: Philip McGrath Received: via spool by 47829-submit@debbugs.gnu.org id=B47829.161860754318408 (code B ref 47829); Fri, 16 Apr 2021 21:13:02 +0000 Received: (at 47829) by debbugs.gnu.org; 16 Apr 2021 21:12:23 +0000 Received: from localhost ([127.0.0.1]:41822 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lXVlC-0004mk-5p for submit@debbugs.gnu.org; Fri, 16 Apr 2021 17:12:23 -0400 Received: from mail-qk1-f179.google.com ([209.85.222.179]:39892) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lXVl9-0004mJ-JX for 47829@debbugs.gnu.org; Fri, 16 Apr 2021 17:12:16 -0400 Received: by mail-qk1-f179.google.com with SMTP id e13so20492611qkl.6 for <47829@debbugs.gnu.org>; Fri, 16 Apr 2021 14:12:15 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=philipmcgrath.com; s=google; h=from:to:cc:subject:date:message-id:in-reply-to:references :mime-version:content-transfer-encoding; bh=6Wz4HOCoHktVdM2b0TNtMsnYKwhzubkcPolZaYmZJhk=; b=FiDNIlTk7DjMgXB2wLXlkOjivSnP36W+fU2RfM6GuGz+dRbdA39KS+Dq4I3SlrA+Eq rc91FL+jx29fnSvQ6+aCeCSkleGucP2hkiEaJqtR7dAwUzkJKeuO8jxUFgV1MsQq9hu/ GOA+JdamoOT+142l+a/37otcY606o7lYllBMTukviMgW9BT5jxTMkX8354JGMC5Iy+DV DV0fkq0tedhnfLxNNc72lWhlJwlIWKGGAQppRPQhsOWhv1Mw0U7EaYuX2H35eqg8YBs+ vw4SvGtuF1o7mD/QLEQ7HTgPAJ8wezRiRVX3eGDUcp0+3JAwG13epBybXVF1OtNeF38C O1lg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to :references:mime-version:content-transfer-encoding; bh=6Wz4HOCoHktVdM2b0TNtMsnYKwhzubkcPolZaYmZJhk=; b=ndda00oaI091FlLm4OUBKLei0zYu2vW9QdxuI/3vf+YLlioEgJfWNhmpfQlL2GKVvo fAnfrdSjvN/5zZRvc98suTAw9DWaKSfpKwfifjT16CquPgicsfzy6MNN71JOhRluSP1W vxEHYMOwYtA3i2OwAW6UzX2+OY06idAtag1DUhSvx4sdECMvEL0qZBoQyVm/YTuvyb7U HjNMiQxr0HekbAQLh6vnPhh8j7ArBVjPeARLE9/AQSLF3d62prXecC4UZp8QAsPkbUyp Krm2Hes2GihLkN+wcyoNsvzivg88QjGZRxapXWeu1smCyPn27x8P7kdL4rKpPFV1x+o3 A1jQ== X-Gm-Message-State: AOAM531e8u35czhelUOIK6sAYoepSh4aB3Sc2C013QXQX3tbON/WO9oJ loDlAlNyVyGy6o7ILhN5X3lwmJ9v+l72yUKNIAw= X-Google-Smtp-Source: ABdhPJw8TRj3e68wgfsUBxtteVmKbcqfrMCl3yV2f8Nsr+FXDOBWKKrh5Jq2IIiS/7GYucOxXbTitg== X-Received: by 2002:a37:42cb:: with SMTP id p194mr1142678qka.213.1618607529826; Fri, 16 Apr 2021 14:12:09 -0700 (PDT) Received: from localhost (c-73-125-89-242.hsd1.fl.comcast.net. [73.125.89.242]) by smtp.gmail.com with ESMTPSA id d62sm5093864qkg.55.2021.04.16.14.12.09 (version=TLS1_3 cipher=TLS_AES_128_GCM_SHA256 bits=128/128); Fri, 16 Apr 2021 14:12:09 -0700 (PDT) From: Philip McGrath Date: Fri, 16 Apr 2021 17:11:39 -0400 Message-Id: <20210416211139.21825-3-philip@philipmcgrath.com> X-Mailer: git-send-email 2.21.1 (Apple Git-122.3) In-Reply-To: <20210416211139.21825-1-philip@philipmcgrath.com> References: <20210416210822.21536-1-philip@philipmcgrath.com> <20210416211139.21825-1-philip@philipmcgrath.com> MIME-Version: 1.0 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: "Guix-patches" X-getmail-retrieved-from-mailbox: Patches * gnu/packages/racket.scm (racket-minimal, racket)[source](uri): Lift base urls into a new internal variable, '%installer-mirrors'. Add mirrors at the University of Utah, Northwestern University, the University of Waterloo, and Vrije Universiteit Brussel (Infogroep). --- gnu/packages/racket.scm | 34 ++++++++++++++++++++++------------ 1 file changed, 22 insertions(+), 12 deletions(-) diff --git a/gnu/packages/racket.scm b/gnu/packages/racket.scm index 73e00240de..f2bbf28564 100644 --- a/gnu/packages/racket.scm +++ b/gnu/packages/racket.scm @@ -47,6 +47,22 @@ #:use-module (gnu packages tls) #:use-module (gnu packages xorg)) + +(define %installer-mirrors + ;; Source: + ;; https://github.com/racket/racket-lang-org/blob/master/download/data.rkt#L58 + ;; Matthew Flatt says: "note that many are commented out" + ;; INVARIANT: End with a trailing "/"! + '("https://mirror.racket-lang.org/installers/" + "https://www.cs.utah.edu/plt/installers/" + "https://plt.cs.northwestern.edu/racket-mirror/" + "https://mirror.csclub.uwaterloo.ca/racket/racket-installers/" + ;; Universität Tübingen is using a self-signed HTTPS certificate: + "http://mirror.informatik.uni-tuebingen.de/mirror/racket/" + "https://racket.infogroep.be/" + )) + + (define-public racket-minimal (package (name "racket-minimal") @@ -54,12 +70,9 @@ (source (origin (method url-fetch) - (uri (list (string-append "https://mirror.racket-lang.org/installers/" - version "/racket-minimal-src.tgz") - ;; this mirror seems to have broken HTTPS: - (string-append - "http://mirror.informatik.uni-tuebingen.de/mirror/racket/" - version "/racket-minimal-src.tgz"))) + (uri (map (lambda (base) + (string-append base version "/racket-minimal-src.tgz")) + %installer-mirrors)) (sha256 "0mwyffw4gcci8wmzxa3j28h03h0gsz55aard8qrk3lri8r2xyg21") (patches (search-patches "racket-sh-via-rktio.patch")))) @@ -197,12 +210,9 @@ DrRacket IDE, are not included.") (source (origin (inherit (package-source racket-minimal)) - (uri (list (string-append "https://mirror.racket-lang.org/installers/" - version "/racket-src.tgz") - ;; this mirror seems to have broken HTTPS: - (string-append - "http://mirror.informatik.uni-tuebingen.de/mirror/racket/" - version "/racket-src.tgz"))) + (uri (map (lambda (base) + (string-append base version "/racket-src.tgz")) + %installer-mirrors)) (sha256 (base32 "047wpjblfzmf1msz7snrp2c2h0zxyzlmbsqr9bwsyvz3frcg0888"))))