From e6b1d5a4a8227603eaeb986e9594b595e847832b Mon Sep 17 00:00:00 2001
From: Linus Nordberg <linus@nordu.net>
Date: Sun, 21 Feb 2016 11:27:03 +0100
Subject: Allow larger HTTP requests.

1MB -> 4MB.
---
 src/catlfish_web.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/catlfish_web.erl b/src/catlfish_web.erl
index f44745d..492c652 100644
--- a/src/catlfish_web.erl
+++ b/src/catlfish_web.erl
@@ -60,7 +60,7 @@ loop(Req, Module) ->
                         Req:respond(Result)
                 end;
             'POST' ->
-                Body = Req:recv_body(),
+                Body = Req:recv_body(4096 * 1024),
                 Result = case http_auth:verify_auth(AuthHeader, "POST",
                                                     Path, Body) of
                              failure ->
-- 
cgit v1.1