stats: fix number of accounts
This commit is contained in:
parent
0734da2bbe
commit
812a800303
@ -16,7 +16,7 @@ import System.IO.UTF8
|
||||
stats :: [Opt] -> [String] -> Ledger -> IO ()
|
||||
stats opts args l = do
|
||||
today <- getCurrentDay
|
||||
putStr $ showStats opts args l today
|
||||
putStr $ showStats opts args (cacheLedger' l) today
|
||||
|
||||
showStats :: [Opt] -> [String] -> Ledger -> Day -> String
|
||||
showStats _ _ l today =
|
||||
|
||||
Loading…
Reference in New Issue
Block a user