;doc: haddock, comment fixes

hledger-lib/Hledger/Data/Journal.hs

@@ -795,7 +795,7 @@ journalModifyTransactions verbosetags d j =
     Left err -> Left err
 
 -- | Apply this journal's commodity display styles to all of its amounts.
--- This does soft rounding (adding/removing decimal zeros, but not losing significant decimal digits);
+-- This does no display rounding, keeping decimal digits as they were;
 -- it is suitable for an early cleanup pass before calculations.
 -- Reports may want to do additional rounding/styling at render time.
 -- This can return an error message eg if inconsistent number formats are found.

hledger-lib/Hledger/Read/Common.hs

@@ -335,7 +335,7 @@ journalFinalise iopts@InputOpts{..} f txt pj = do
        -- >>= \j -> deepseq (concatMap (T.unpack.showTransaction).jtxns $ j) (return j)
       >>= journalMarkRedundantCosts                      -- Mark redundant costs, to help journalBalanceTransactions ignore them
       >>= journalBalanceTransactions balancingopts_      -- infer balance assignments and missing amounts and maybe check balance assertions.
-      >>= journalInferCommodityStyles                    -- infer commodity styles once more now that all posting amounts are present (XXX or journalApplyCommodityStyles ?)
+      >>= journalInferCommodityStyles                    -- infer commodity styles once more now that all posting amounts are present (XXX or journalStyleAmounts ?)
       -- >>= Right . dbg0With (pshow.journalCommodityStyles)
       >>= (if infer_costs_  then journalInferCostsFromEquity else pure)     -- Maybe infer costs from equity postings where possible
       <&> (if infer_equity_ then journalInferEquityFromCosts verbose_tags_ else id)  -- Maybe infer equity postings from costs where possible