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

bal: comment fixes

Browse Source 
[ci skip]
This commit is contained in:
Simon Michael 2018-03-15 19:39:15 +00:00
parent 10a4392b24
commit d4eb3caf70
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
hledger/Hledger/Cli/Commands/Balance.hs
View File

@ -344,9 +344,9 @@ balance opts@CliOpts{rawopts_=rawopts,reportopts_=ropts} j = do
_ -> multiBalanceReportAsText ropts _ -> multiBalanceReportAsText ropts
writeOutput opts $ render report writeOutput opts $ render report
-- | Re-map account names to closet parent with periodic transaction from budget. -- | Re-map account names to closest parent with periodic transaction from budget.
-- Accounts that dont have suitable parent are either remapped to "<unbudgeted>:topAccount" -- Accounts that don't have suitable parent are either remapped to "<unbudgeted>:topAccount"
-- or left as-is if --show-unbudgeted is provided -- or left as-is if --show-unbudgeted is provided.
budgetRollUp :: CliOpts -> Journal -> Journal -> Journal budgetRollUp :: CliOpts -> Journal -> Journal -> Journal
budgetRollUp CliOpts{rawopts_=rawopts} budget j = j { jtxns = remapTxn <$> jtxns j } budgetRollUp CliOpts{rawopts_=rawopts} budget j = j { jtxns = remapTxn <$> jtxns j }
where where
@ -365,7 +365,7 @@ budgetRollUp CliOpts{rawopts_=rawopts} budget j = j { jtxns = remapTxn <$> jtxns
mapPostings f t = txnTieKnot $ t { tpostings = f $ tpostings t } mapPostings f t = txnTieKnot $ t { tpostings = f $ tpostings t }
-- | Generate journal of all periodic transactions in the given journal for the -- | Generate journal of all periodic transactions in the given journal for the
-- entireity of its history or reporting period, whatever is smaller -- entirety of its history or reporting period, whatever is smaller.
budgetJournal :: CliOpts -> Journal -> Journal budgetJournal :: CliOpts -> Journal -> Journal
budgetJournal opts j = journalBalanceTransactions' opts j { jtxns = budget } budgetJournal opts j = journalBalanceTransactions' opts j { jtxns = budget }
where where