Journal's Show instance reported one too many accounts

2015-06-28 14:14:56 -07:00 · 2015-06-28 14:14:56 -07:00 · 61e4034de5
commit 61e4034de5
parent ba18f4a25a
1 changed files with 1 additions and 1 deletions
--- a/hledger-lib/Hledger/Data/Journal.hs
+++ b/hledger-lib/Hledger/Data/Journal.hs
@ -106,7 +106,7 @@ instance Show Journal where
             (show accounts)
             (show $ jcommoditystyles j)
             -- ++ (show $ journalTransactions l)
-             where accounts = flatten $ journalAccountNameTree j
+             where accounts = filter (/= "root") $ flatten $ journalAccountNameTree j

 -- showJournalDebug j = unlines [
 --                       show j