IntenseFinance/simplex-chat
3
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

cleanup

Browse Source
This commit is contained in:
pdavidow 2023-08-18 11:59:35 -04:00
parent d005d79d54
commit faf09acf65
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Simplex/Chat/MarkdownEditing.hs
View File

@ -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), (_,d)) = (i,c,d) -- peg on left
g ((i,c), (_,d)) = (i,c,d)
markDeletesAndUnchangedChars :: Seq DiffedChar
markDeletesAndUnchangedChars = S.mapWithIndex f left