From 44578211ffdca21418d493c45c2f5598e4079b31 Mon Sep 17 00:00:00 2001 From: joshvera Date: Wed, 10 Feb 2016 10:57:41 -0800 Subject: [PATCH] add some dots --- src/PatchOutput.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/PatchOutput.hs b/src/PatchOutput.hs index db7777ac4..759f1f4ce 100644 --- a/src/PatchOutput.hs +++ b/src/PatchOutput.hs @@ -70,7 +70,7 @@ getRange (Pure (Info range _ :< _)) = range header :: (SourceBlob, SourceBlob) -> Hunk a -> String header blobs hunk = "diff --git a/path.txt b/path.txt\n" ++ - "index " ++ oid (fst blobs) ++ " " ++ oid (snd blobs) ++ "\n" ++ + "index " ++ oid (fst blobs) ++ ".." ++ oid (snd blobs) ++ "\n" ++ "@@ -" ++ show offsetA ++ "," ++ show lengthA ++ " +" ++ show offsetB ++ "," ++ show lengthB ++ " @@\n" where (lengthA, lengthB) = join bimap getSum $ hunkLength hunk (offsetA, offsetB) = join bimap getSum $ offset hunk