From 1a450545f23f22d710e3de612999a55700c47297 Mon Sep 17 00:00:00 2001
From: Julian Ospald <hasufell@posteo.de>
Date: Thu, 5 Jan 2023 21:47:35 +0800
Subject: [PATCH] Fix

---
 app/ghcup/AnsiMain.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/app/ghcup/AnsiMain.hs b/app/ghcup/AnsiMain.hs
index 5722b8e..1afd431 100644
--- a/app/ghcup/AnsiMain.hs
+++ b/app/ghcup/AnsiMain.hs
@@ -422,6 +422,7 @@ install' _ (_, ListResult {..}) = do
               , BuildFailed
               , TagNotFound
               , DigestError
+              , ContentLengthError
               , GPGError
               , DownloadFailed
               , DirNotEmpty
@@ -605,6 +606,7 @@ getGHCupInfo = do
     flip runReaderT settings
     . runE
       @'[ DigestError
+        , ContentLengthError
         , GPGError
         , JSONError
         , DownloadFailed