maximumContentLength is Word64 (#365)

This commit is contained in:
Michael Snoyman 2012-06-26 22:52:56 +03:00
parent 014732dac8
commit 4a6e027d29

View File

@ -47,6 +47,7 @@ import Yesod.Handler hiding (lift, getExpires)
import Yesod.Routes.Class
import Data.Word (Word64)
import Control.Arrow ((***))
import Control.Monad (forM)
import Yesod.Widget
@ -290,7 +291,7 @@ $doctype 5
cookieDomain _ = Nothing
-- | Maximum allowed length of the request body, in bytes.
maximumContentLength :: a -> Maybe (Route a) -> Int
maximumContentLength :: a -> Maybe (Route a) -> Word64
maximumContentLength _ _ = 2 * 1024 * 1024 -- 2 megabytes
-- | Send a message to the log. By default, prints to stdout.