diff --git a/src/Lib/Semver.hs b/src/Lib/Semver.hs index 16786ff..56b0ac0 100644 --- a/src/Lib/Semver.hs +++ b/src/Lib/Semver.hs @@ -5,7 +5,7 @@ import Startlude import Lib.Types.Semver (<||) :: HasAppVersion a => a -> AppVersionSpecification -> Bool -(<||) a AppVersionAny = True +(<||) _ AppVersionAny = True (<||) a (AppVersionSpecification SVEquals av1) = version a == av1 (<||) a (AppVersionSpecification SVLessThan av1) = version a < av1 (<||) a (AppVersionSpecification SVGreaterThan av1) = version a > av1