diff --git a/hledger-web/Handler/Common.hs b/hledger-web/Handler/Common.hs index 0c1f5d6fb..b73f50b5b 100644 --- a/hledger-web/Handler/Common.hs +++ b/hledger-web/Handler/Common.hs @@ -138,7 +138,7 @@ searchform VD{..} = [hamlet| -- -- -- ^{formathelp} --- +-- -- -- Are you sure ? This will overwrite the journal. # -- @@ -193,7 +193,7 @@ balanceReportAsHtml _ vd@VD{..} (items',total) = - #{mixedAmountAsHtml total} + #{mixedAmountAsHtml total} |] where l = ledgerFromJournal Any j @@ -210,11 +210,11 @@ balanceReportAsHtml _ vd@VD{..} (items',total) =   only - #{mixedAmountAsHtml abal} + #{mixedAmountAsHtml abal} |] where hassubs = not $ maybe False (null.asubs) $ ledgerAccount l acct - -- (#{numpostings}) + -- (#{numpostings}) -- numpostings = maybe 0 (length.apostings) $ ledgerAccount l acct depthclass = "depth"++show aindent inacctclass = case inacctmatcher of diff --git a/hledger-web/Handler/JournalR.hs b/hledger-web/Handler/JournalR.hs index 2645997ee..6640423dc 100644 --- a/hledger-web/Handler/JournalR.hs +++ b/hledger-web/Handler/JournalR.hs @@ -35,7 +35,7 @@ getJournalR = do hledgerLayout vd "journal" [hamlet| #{title} - Add a transaction + Add a transaction ^{maincontent} |] diff --git a/hledger-web/static/hledger.css b/hledger-web/static/hledger.css index 6c0af21ce..7b95994aa 100644 --- a/hledger-web/static/hledger.css +++ b/hledger-web/static/hledger.css @@ -128,6 +128,9 @@ tr td:first-child { padding-left:0.3em; } .amount, .balance { width:2em; } /* minimise width */ .positive { } +td.balance, td.numpostings { + text-align: right; +} /* table.transactionsreport { border-spacing: 0; } */ /* .transactionsreport td { } */ /* .transactionsreport pre { margin-top:0; } */