Permalink
Browse files

Fix spacing

  • Loading branch information...
1 parent d21f34d commit a9bd98529728d8cb498bd445b66fd805de700077 @mightybyte mightybyte committed Jan 15, 2013
Showing with 5 additions and 5 deletions.
  1. +5 −5 src/Snap/Snaplet/HeistNoClass.hs
@@ -325,8 +325,8 @@ iRenderHelper c t = do
------------------------------------------------------------------------------
-- | Internal helper function for rendering.
cRenderHelper :: Maybe MIMEType
- -> ByteString
- -> Handler b (Heist b) ()
+ -> ByteString
+ -> Handler b (Heist b) ()
cRenderHelper c t = do
(Running hs _) <- get
withTop' id $ maybe pass serve $ C.renderTemplate hs t
@@ -355,16 +355,16 @@ renderAs ct t = iRenderHelper (Just ct) t
------------------------------------------------------------------------------
cRender :: ByteString
-- ^ Name of the template
- -> Handler b (Heist b) ()
+ -> Handler b (Heist b) ()
cRender t = cRenderHelper Nothing t
------------------------------------------------------------------------------
cRenderAs :: ByteString
-- ^ Content type
- -> ByteString
+ -> ByteString
-- ^ Name of the template
- -> Handler b (Heist b) ()
+ -> Handler b (Heist b) ()
cRenderAs ct t = cRenderHelper (Just ct) t

0 comments on commit a9bd985

Please sign in to comment.