- sameName :: PackageIdentifier -> PackageIdentifier -> Bool
- sameName a b = pkgName a == pkgName b
-
- newerVers :: PackageIdentifier -> PackageIdentifier -> Bool
- newerVers a b = pkgVersion a < pkgVersion b
+ isNewerThan :: PackageIdentifier -> PackageIdentifier -> Bool
+ isNewerThan a b
+ = pkgName a == pkgName b &&
+ pkgVersion a > pkgVersion b