lib: clarify flattenAccounts

2015-09-02 16:20:41 -07:00 · 2015-09-02 16:20:41 -07:00 · b770190942
commit b770190942
parent b8d75b7728
1 changed files with 2 additions and 2 deletions
--- a/hledger-lib/Hledger/Data/Account.hs
+++ b/hledger-lib/Hledger/Data/Account.hs
@ -169,7 +169,7 @@ pruneAccounts p = headMay . prune

 -- | Flatten an account tree into a list, which is sometimes
 -- convenient. Note since accounts link to their parents/subs, the
-- account tree remains intact and can still be used. It's a tree/list!
+-- tree's structure remains intact and can still be used. It's a tree/list!
 flattenAccounts :: Account -> [Account]
 flattenAccounts a = squish a []
  where squish a as = a : Prelude.foldr squish as (asubs a)