bank-holidays-england 0.1.0.8 → 0.2.0.1

raw patch · 3 files changed

+6/−5 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• bank-holidays-england.cabal +2/−2
• src/Data/Time/Calendar/BankHoliday/EnglandAndWales.hs +3/−1
• test/Data/Time/Calendar/BankHoliday/EnglandAndWalesSpec.hs +1/−2

@@ -1,10 +1,10 @@ name:                bank-holidays-england-version:             0.1.0.8+version:             0.2.0.1 synopsis:            Calculation of bank holidays in England and Wales description:   Calculation of bank holidays in England and Wales, using the rules that have   been in place since 1978, and including all exceptions to the rules in the-  years 1995 to 2014.+  years 1995 to 2020.  homepage:            https://bitbucket.org/davecturner/bank-holidays-england license:             BSD3

@@ -2,7 +2,7 @@  Calculation of bank holidays in England and Wales, using the rules that have been in place since 1978, and including all exceptions to the rules in the-years 1995 to 2014. I do not know of any exceptions from 1978 until 1995, so+years 1995 to 2020. I do not know of any exceptions from 1978 until 1995, so the calculations may be correct for those years too. Calculations for future dates are predictions which may be rendered false if exceptions to the rules are announced.@@ -111,6 +111,7 @@ skipped = S.fromList  [ fromGregorian 1995 05 1                       , fromGregorian 2002 05 27                       , fromGregorian 2012 05 28+                      , fromGregorian 2020 05 04                       ]  extras :: S.Set Day@@ -121,6 +122,7 @@                       , fromGregorian 2011 04 29                       , fromGregorian 2012 06 04                       , fromGregorian 2012 06 05+                      , fromGregorian 2020 05 08                       ]  extraYears :: [Integer]

@@ -3,9 +3,7 @@  module Data.Time.Calendar.BankHoliday.EnglandAndWalesSpec (spec) where -import Control.Applicative import Control.Monad-import Data.Monoid import Data.Time import Test.Hspec import Test.QuickCheck@@ -28,6 +26,7 @@     2014 `hasBankHolidays` [(01,01), (04,18), (04,21), (05,05), (05,26), (08,25), (12,25), (12,26)]     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)]      it "always returns weekdays" $ property       $ \yr -> not $ any (\d -> toModifiedJulianDay d `mod` 7 `elem` [3,4])