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

lib: don't count periodic/modifier txns in Journal debug output

Browse Source
This commit is contained in:
Simon Michael 2018-03-29 16:45:34 +01:00
parent fc3a71bc46
commit 4d562ef068
1 changed files with 3 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
hledger-lib/Hledger/Data/Journal.hs
View File

@ -119,22 +119,16 @@ instance Show Journal where
show j show j
| debugLevel < 3 = printf "Journal %s with %d transactions, %d accounts" | debugLevel < 3 = printf "Journal %s with %d transactions, %d accounts"
(journalFilePath j) (journalFilePath j)
(length (jtxns j) + (length $ jtxns j)
length (jmodifiertxns j) +
length (jperiodictxns j))
(length accounts) (length accounts)
| debugLevel < 6 = printf "Journal %s with %d transactions, %d accounts: %s" | debugLevel < 6 = printf "Journal %s with %d transactions, %d accounts: %s"
(journalFilePath j) (journalFilePath j)
(length (jtxns j) + (length $ jtxns j)
length (jmodifiertxns j) +
length (jperiodictxns j))
(length accounts) (length accounts)
(show accounts) (show accounts)
| otherwise = printf "Journal %s with %d transactions, %d accounts: %s, commodity styles: %s" | otherwise = printf "Journal %s with %d transactions, %d accounts: %s, commodity styles: %s"
(journalFilePath j) (journalFilePath j)
(length (jtxns j) + (length $ jtxns j)
length (jmodifiertxns j) +
length (jperiodictxns j))
(length accounts) (length accounts)
(show accounts) (show accounts)
(show $ jinferredcommodities j) (show $ jinferredcommodities j)