From 37861ff05485eec26feafcf7006ebe82f2a1c389 Mon Sep 17 00:00:00 2001
From: Tom Nunn <tom@emovia.net>
Date: Fri, 24 Mar 2023 11:11:55 +0000
Subject: [PATCH] Increase file size limit for docs.json
---
src/backend/Package/Register.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/backend/Package/Register.hs b/src/backend/Package/Register.hs
index 64d5c31f..0a98fd5d 100644
--- a/src/backend/Package/Register.hs
+++ b/src/backend/Package/Register.hs
@@ -235,7 +235,7 @@ handlePart pkg vsn dir info stream =
boundedGzipAndWrite 128000 dir "elm.json" stream
"docs.json" ->
- boundedGzipAndWrite 768000 dir "docs.json" stream
+ boundedGzipAndWrite 1024000 dir "docs.json" stream
"github-hash" ->
boundedWriteEndpoint pkg vsn dir stream