Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Merge.hs: cleanup: shortened 'filter (`notElem` xs)' down to 'L.\\ xs'

Signed-off-by: Sergei Trofimovich <slyfox@gentoo.org>
  • Loading branch information...
commit b5678478425ac907c762d03b80bcd70454708455 1 parent 9324b46
@trofi trofi authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 Merge.hs
View
4 Merge.hs
@@ -259,8 +259,8 @@ mergeGenericPackageDescription verbosity overlayPath cat pkgGenericDesc fetch =
pop_from_pair ((lfa, ld), lx) ((rfa, rd), rx) = ((fa, d), x)
where fa = lfa `L.intersect` rfa
d = Portage.simplify_deps $ ld `L.intersect` rd
- x = (lfa, filter (`notElem` rd) ld)
- : (rfa, filter (`notElem` ld) rd)
+ x = (lfa, ld L.\\ rd)
+ : (rfa, rd L.\\ ld)
: lx ++ rx
simplify :: [FlagDepH] -> [Portage.Dependency]
Please sign in to comment.
Something went wrong with that request. Please try again.