From 22a5ad739e15984e2449a93f7a24a2f02e1f6664 Mon Sep 17 00:00:00 2001 From: Julian Ospald Date: Mon, 20 Jul 2020 20:47:45 +0200 Subject: [PATCH] Don't try non-musl bindists for Alpine Linux --- lib/GHCup/Download.hs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lib/GHCup/Download.hs b/lib/GHCup/Download.hs index 0d655a8..9ea86f9 100644 --- a/lib/GHCup/Download.hs +++ b/lib/GHCup/Download.hs @@ -270,7 +270,10 @@ getDownloadInfo :: Tool getDownloadInfo t v (PlatformRequest a p mv) dls = maybe (Left NoDownload) Right - (with_distro <|> without_distro_ver <|> without_distro) + (case p of + -- non-musl won't work on alpine + Linux Alpine -> with_distro <|> without_distro_ver + _ -> with_distro <|> without_distro_ver <|> without_distro) where with_distro = distro_preview id id