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

stats: reorder slightly

Browse Source
This commit is contained in:
Simon Michael 2010-02-26 00:24:21 +00:00
parent 8f28cd84c7
commit bd3148c690
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Commands/Stats.hs
View File

@ -32,11 +32,11 @@ showStats _ _ l today =
stats = [ stats = [
("File", filepath $ journal l) ("File", filepath $ journal l)
,("Period", printf "%s to %s (%d days)" (start span) (end span) days) ,("Period", printf "%s to %s (%d days)" (start span) (end span) days)
,("Last transaction", maybe "none" show lastdate ++
maybe "" (printf " (%d days ago)") lastelapsed)
,("Transactions", printf "%d (%0.1f per day)" tnum txnrate) ,("Transactions", printf "%d (%0.1f per day)" tnum txnrate)
,("Transactions last 30 days", printf "%d (%0.1f per day)" tnum30 txnrate30) ,("Transactions last 30 days", printf "%d (%0.1f per day)" tnum30 txnrate30)
,("Transactions last 7 days", printf "%d (%0.1f per day)" tnum7 txnrate7) ,("Transactions last 7 days", printf "%d (%0.1f per day)" tnum7 txnrate7)
,("Last transaction", maybe "none" show lastdate ++
maybe "" (printf " (%d days ago)") lastelapsed)
-- ,("Payees/descriptions", show $ length $ nub $ map tdescription ts) -- ,("Payees/descriptions", show $ length $ nub $ map tdescription ts)
,("Accounts", show $ length $ accounts l) ,("Accounts", show $ length $ accounts l)
,("Commodities", show $ length $ commodities l) ,("Commodities", show $ length $ commodities l)