hledger/LedgerFile.hs

16 lines
332 B
Haskell
Raw Normal View History

module LedgerFile
where
import qualified Data.Map as Map
import Utils
import Types
2007-07-03 03:41:07 +04:00
import AccountName
import LedgerEntry
instance Show LedgerFile where
show l = printf "LedgerFile with %d entries"
((length $ entries l) +
(length $ modifier_entries l) +
(length $ periodic_entries l))