packages feed

bank-holidays-england 0.2.0.5 → 0.2.0.6

raw patch · 3 files changed

+6/−2 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

bank-holidays-england.cabal view
@@ -1,5 +1,5 @@ name:                bank-holidays-england-version:             0.2.0.5+version:             0.2.0.6 synopsis:            Calculation of bank holidays in England and Wales description:   Calculation of bank holidays in England and Wales, using the rules that have
src/Data/Time/Calendar/BankHoliday/EnglandAndWales.hs view
@@ -112,6 +112,7 @@                       , fromGregorian 2002 05 27                       , fromGregorian 2012 05 28                       , fromGregorian 2020 05 04+                      , fromGregorian 2022 05 30                       ]  extras :: S.Set Day@@ -123,6 +124,8 @@                       , fromGregorian 2012 06 04                       , fromGregorian 2012 06 05                       , fromGregorian 2020 05 08+                      , fromGregorian 2022 06 02+                      , fromGregorian 2022 06 03                       ]  extraYears :: [Integer]
test/Data/Time/Calendar/BankHoliday/EnglandAndWalesSpec.hs view
@@ -26,6 +26,7 @@     2015 `hasBankHolidays` [(01,01), (04,03), (04,06), (05,04), (05,25), (08,31), (12,25), (12,28)]     2016 `hasBankHolidays` [(01,01), (03,25), (03,28), (05,02), (05,30), (08,29), (12,26), (12,27)]     2020 `hasBankHolidays` [(01,01), (04,10), (04,13), (05,08), (05,25), (08,31), (12,25), (12,28)]+    2022 `hasBankHolidays` [(01,03), (04,15), (04,18), (05,02), (06,02), (06,03), (08,29), (12,26), (12,27)]      it "always returns weekdays" $ property       $ \yr -> not $ any (\d -> toModifiedJulianDay d `mod` 7 `elem` [3,4])@@ -38,7 +39,7 @@                 in isStrictlyIncreasing $ bankHolidays yr    describe "isBankHoliday" $-    forM_ [1990..2020] $ \yr ->+    forM_ [1990..2030] $ \yr ->       it ("agrees with bankHolidays in " ++ show yr) $         filter isBankHoliday [fromGregorian yr 01 01 .. fromGregorian yr 12 31]         `shouldBe` bankHolidays yr