Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

maximumContentLength is now a Word64.

  • Loading branch information...
commit ceac45b56c28ab8b6d8c6a421e8486ebb3a4df1e 1 parent 4d873fa
@ahodgen ahodgen authored
Showing with 2 additions and 2 deletions.
  1. BIN  src/.gitit2.hs.swp
  2. +2 −2 src/gitit2.hs
View
BIN  src/.gitit2.hs.swp
Binary file not shown
View
4 src/gitit2.hs
@@ -30,7 +30,7 @@ mkYesod "Master" [parseRoutes|
instance Yesod Master where
defaultLayout contents = do
PageContent title headTags bodyTags <- widgetToPageContent $ do
- addWidget contents
+ contents
mmsg <- getMessage
hamletToRepHtml [hamlet|
$doctype 5
@@ -43,7 +43,7 @@ instance Yesod Master where
<p.message>#{msg}
^{bodyTags}
|]
- maximumContentLength x _ = maxUploadSize x
+ maximumContentLength x _ = fromIntegral $ maxUploadSize x
instance RenderMessage Master FormMessage where
renderMessage _ _ = defaultFormMessage
Please sign in to comment.
Something went wrong with that request. Please try again.