mirror of
https://github.com/simonmichael/hledger.git
synced 2024-12-26 03:42:25 +03:00
fix ledger show
This commit is contained in:
parent
8236f3f988
commit
e5fc135707
@ -17,9 +17,9 @@ data Ledger = Ledger {
|
||||
|
||||
instance Show Ledger where
|
||||
show l = printf "Ledger with %d normal, %d modifier, %d periodic entries"
|
||||
(length $ entries l)
|
||||
(length $ modifier_entries l)
|
||||
(length $ periodic_entries l)
|
||||
(length $ entries l)
|
||||
|
||||
ledgerTransactions :: Ledger -> [EntryTransaction]
|
||||
ledgerTransactions l = entryTransactionsFrom $ entries l
|
||||
|
Loading…
Reference in New Issue
Block a user