From ee62d9eb79eb7fdd32347b07fe81462da4d01d40 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Sun, 22 Jan 2017 14:24:53 -0800 Subject: [PATCH] rewrite: -> JournalSourcePos --- bin/hledger-rewrite.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bin/hledger-rewrite.hs b/bin/hledger-rewrite.hs index f4d17bf24..dfaa95a85 100755 --- a/bin/hledger-rewrite.hs +++ b/bin/hledger-rewrite.hs @@ -155,7 +155,7 @@ diffTxn j t t' = -- suffix .ledger (generated). I.e. move transaction from one file to another. diffs :: [DiffLine String] diffs = concat . map (traverse showPostingLines . mapDiff) $ D.getDiff (tpostings t) (tpostings t') - pos@(LedgerSourcePos fp (line, line')) -> (pos, diffs) where + pos@(JournalSourcePos fp (line, line')) -> (pos, diffs) where -- We do diff for original lines vs generated ones. Often leads -- to big diff because of re-format effect. diffs :: [DiffLine String]