github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-03 13:02:37 +03:00
Code Issues Projects Releases Wiki Activity

Patches count as changes.

Browse Source
This commit is contained in:
Rob Rix 2017-09-10 15:23:22 +01:00
parent e5d345dca7
commit fd05f7cb80
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/Renderer/TOC.hs
View File

@ -157,7 +157,7 @@ tableOfContentsBy selector = fromMaybe [] . evalDiff diffAlgebra
(Just a, Just []) -> Just [Changed a]
(_ , entries) -> entries
Var v -> join (envLookup v env)
Patch patch -> foldMap (\ t -> fold t <> (pure . patchEntry patch <$> selector t)) patch
Patch patch -> Just [] <> foldMap (\ t -> fold t <> (pure . patchEntry patch <$> selector t)) patch
patchEntry = these (const Deleted) (const Inserted) (const (const Replaced)) . unPatch