github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-24 08:54:07 +03:00
Code Issues Projects Releases Wiki Activity

Simplify Row to two HTML elements.

Browse Source
This commit is contained in:
Rob Rix 2015-12-03 10:05:18 -05:00
parent c246b08cf4
commit bc57f7f871
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
app/Split.hs
View File

@ -24,11 +24,7 @@ data HTML =
split :: Diff a Info -> String -> String -> IO ByteString
split _ _ _ = return mempty
data Row =
ContextRow HTML HTML
| ReplaceRow HTML HTML
| InsertRow HTML
| DeleteRow HTML
data Row = Row (Maybe HTML, Maybe HTML)
straightToSplit :: Diff a Info -> String -> String -> [Row]
straightToSplit (Free (Annotated (left, right) syntax)) = freeSyntaxToSplit (left, right) syntax