From d005d79d54aab6d8f0f0a703e3bde1fe7ef53f8c Mon Sep 17 00:00:00 2001 From: pdavidow Date: Thu, 17 Aug 2023 11:35:57 -0400 Subject: [PATCH] cleanup --- src/Simplex/Chat/MarkdownEditing.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Simplex/Chat/MarkdownEditing.hs b/src/Simplex/Chat/MarkdownEditing.hs index 228cf3b70e..d3708759a8 100644 --- a/src/Simplex/Chat/MarkdownEditing.hs +++ b/src/Simplex/Chat/MarkdownEditing.hs @@ -130,7 +130,7 @@ findDiffs (LeftSide left) (RightSide right) = addInserts markDeletesAndUnchanged where x = if fL == fR then UnchangedFormat else ChangedToFormat fR g :: ((Int, FormattedChar), (Int, FormattedChar)) -> (Int, FormattedChar, FormattedChar) - g ((i,c), (_j,d)) = (i,c,d) -- peg on left with i + g ((i,c), (_,d)) = (i,c,d) -- peg on left markDeletesAndUnchangedChars :: Seq DiffedChar markDeletesAndUnchangedChars = S.mapWithIndex f left