slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions 2 Packages Projects Releases Wiki Activity

cleanup

Browse Source
This commit is contained in:
Simon Michael 2010-07-05 19:38:04 +00:00
parent d6835b6cc7
commit 27fcf68a61
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Hledger/Cli/Commands/WebYesod.hs
View File

@ -125,12 +125,8 @@ withLatestJournalRender reportfn = do
req <- getRequest
msg <- getMessage
return $ RepHtml $ toContent $ renderHamlet id $ template req msg as ps "hledger" s
-- hamletToRepHtml $ template req msg as ps "hledger" s
-- template :: Request -> Maybe (Html ()) -> [String] -> [String] -> String -> String -> Hamlet (Routes HledgerWebApp)
-- Couldn't match expected type `Routes HledgerWebApp'
-- against inferred type `[Char]'
-- hamletToRepHtml $ template req msg as ps "hledger" s
-- template :: Request -> Maybe (Html ()) -> [String] -> [String] -> String -> String -> Hamlet String
template req msg as ps title content = [$hamlet|
!!!
%html