mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2024-12-17 17:20:21 +01:00
cleanup
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user