simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-09-20 10:47:29 +03:00
Code Issues Projects Releases Wiki Activity

detect precisions from the whole ledger, not just the filtered part

Browse Source
This commit is contained in:
Simon Michael 2008-11-22 09:22:55 +00:00
parent fcdc4dc273
commit 7819abd80f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hledger.hs
View File

@ -70,7 +70,7 @@ parseLedgerAndDo :: [Opt] -> [String] -> ([Opt] -> [String] -> Ledger -> IO ())
parseLedgerAndDo opts args cmd = parseLedgerAndDo opts args cmd =
ledgerFilePathFromOpts opts >>= parseLedgerFile >>= either printParseError runcmd ledgerFilePathFromOpts opts >>= parseLedgerFile >>= either printParseError runcmd
where where
runcmd = cmd opts args . cacheLedger apats . canonicaliseAmounts . filterRawLedger b e dpats c r runcmd = cmd opts args . cacheLedger apats . filterRawLedger b e dpats c r . canonicaliseAmounts
b = beginDateFromOpts opts b = beginDateFromOpts opts
e = endDateFromOpts opts e = endDateFromOpts opts
(apats,dpats) = parseAccountDescriptionArgs args (apats,dpats) = parseAccountDescriptionArgs args