renderFiles :: YesodMediaSub m => SectionId -> Source (HandlerT m IO) Text -> SubHandler m TypedContent
renderFiles sid source = selectRep $
    provideRep $ do
        elements <- lift $ source $$ CL.consume
        defaultLayoutMedia $
            [whamlet|

            |]

-- | Recursively find all files
renderFiles :: YesodMediaSub m => SectionId -> Source (HandlerT m IO) Text -> SubHandler m TypedContent
renderFiles sid source = selectRep $
    provideRep $ do
        elements <- lift $ source $$ CL.consume
        defaultLayoutMedia $
            [whamlet|

            |]

-- | Recursively find all files
renderFiles sid source = selectRep $
    provideRep $ do
        elements <- lift $ source $$ CL.consume
        defaultLayoutMedia $
            [whamlet|

            |]

-- | Recursively find all files