Hledger.Data.AccountName

AccountNames are strings like assets:cash:petty. From a set of these we derive the account hierarchy.

Documentation

accountNameComponents :: AccountName -> [String]

accountNameFromComponents :: [String] -> AccountName

accountLeafName :: AccountName -> String

accountNameLevel :: AccountName -> Int

expandAccountNames :: [AccountName] -> [AccountName]

a:b:c,d:e

-> [a,a:b,a:b:c,d,d:e]

topAccountNames :: [AccountName] -> [AccountName]

a:b:c,d:e

-> [a,d]

parentAccountName :: AccountName -> AccountName

parentAccountNames :: AccountName -> [AccountName]

isAccountNamePrefixOf :: AccountName -> AccountName -> Bool

isSubAccountNameOf :: AccountName -> AccountName -> Bool

subAccountNamesFrom :: [AccountName] -> AccountName -> [AccountName]

From a list of account names, select those which are direct subaccounts of the given account name.

accountNameTreeFrom :: [AccountName] -> Tree AccountName

Convert a list of account names to a tree.

newtype Tree' a

Constructors

T (Map a (Tree' a))

Instances

Eq a => Eq (Tree' a)

Ord a => Ord (Tree' a)

Show a => Show (Tree' a)

mergeTrees :: Ord a => Tree' a -> Tree' a -> Tree' a

pathtree :: [a] -> Tree' a

fromPaths :: Ord a => [[a]] -> Tree' a

converttree :: Tree' AccountName -> [Tree AccountName]

expandTreeNames :: Tree AccountName -> Tree AccountName

accountNameTreeFrom4 :: [AccountName] -> Tree AccountName

elideAccountName :: Int -> AccountName -> AccountName

Elide an account name to fit in the specified width. From the ledger 2.6 news:

   What Ledger now does is that if an account name is too long, it will
   start abbreviating the first parts of the account name down to two
   letters in length.  If this results in a string that is still too
   long, the front will be elided -- not the end.  For example:

Expenses:Cash           ; OK, not too long
     Ex:Wednesday:Cash       ; Expenses was abbreviated to fit
     Ex:We:Afternoon:Cash    ; Expenses and Wednesday abbreviated
     ; Expenses:Wednesday:Afternoon:Lunch:Snack:Candy:Chocolate:Cash
     ..:Af:Lu:Sn:Ca:Ch:Cash  ; Abbreviated and elided!

clipAccountName :: Int -> AccountName -> AccountName