packages feed

cron 0.7.1 → 0.7.2

raw patch · 7 files changed

+13/−10 lines, 7 filesdep +data-defaultdep −data-default-classPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependencies added: data-default

Dependencies removed: data-default-class

API changes (from Hackage documentation)

- System.Cron.Internal.Describe.Options: instance Data.Default.Class.Default System.Cron.Internal.Describe.Options.Options
+ System.Cron.Internal.Describe.Options: instance Data.Default.Internal.Default System.Cron.Internal.Describe.Options.Options

Files

changelog view
@@ -1,3 +1,5 @@+# 0.7.2+* Replace data-default-class with data-default, Michael Xavier (@MichaelXavier) # 0.7.1 * expose fork job, Jappie Klooster (@jappeace) # 0.7.0
cron.cabal view
@@ -1,5 +1,5 @@ Name:                cron-Version:             0.7.1+Version:             0.7.2 Description:   Cron data structure and Attoparsec parser. The idea is to embed it in larger   systems which want to roll their own scheduled tasks in a format that people@@ -64,7 +64,7 @@                    , mtl             >= 2.0.1                    , mtl-compat      >= 0.2.1                    , semigroups-                   , data-default-class >= 0.0.1+                   , data-default   if flag(lib-Werror)     ghc-options: -Werror 
src/System/Cron/Internal/Check.hs view
@@ -12,7 +12,7 @@ import           Data.Time                   (Day, DiffTime, UTCTime (..),                                               addUTCTime, fromGregorianValid,                                               toGregorian)-import           Data.Time.Calendar.WeekDate+import           Data.Time.Calendar.WeekDate (toWeekDate) import qualified Data.Traversable            as FT ------------------------------------------------------------------------------- import           System.Cron.Types           as CT
src/System/Cron/Internal/Describe/Options.hs view
@@ -12,7 +12,7 @@ module System.Cron.Internal.Describe.Options where  --------------------------------------------------------------------------------import Data.Default.Class+import Data.Default import Data.Semigroup as Semigroup ------------------------------------------------------------------------------- import System.Cron.Internal.Describe.Types
test/System/Test/Cron.hs view
@@ -102,8 +102,8 @@                       (UTCTime (fromGregorian 2014 11 1) 600) @?= True     -- https://github.com/MichaelXavier/cron/issues/18     , testCase "correctly schedules steps and ranges" $ do-      let Right oddMinute = parseOnly cronSchedule "1-59/2 * * * *"-      let Right evenMinute = parseOnly cronSchedule "0-59/2 * * * *"+      let oddMinute = either error id $ parseOnly cronSchedule "1-59/2 * * * *"+      let evenMinute = either error id $ parseOnly cronSchedule "0-59/2 * * * *"       let t1 = mkTime 2015 7 17 15 17 0       let t2 = mkTime 2015 7 17 15 18 0       scheduleMatches oddMinute t1 @?= True
test/System/Test/Cron/Describe.hs view
@@ -126,7 +126,7 @@     ]   ]   where-    mkCronSchedule t = let (Right cs) = parseCronSchedule t in cs+    mkCronSchedule t = let cs = either error id $ parseCronSchedule t in cs     describeNV = describe (twentyFourHourFormat <> notVerbose) . mkCronSchedule     describeV  = describe (twentyFourHourFormat <> verbose) . mkCronSchedule     describe12 = describe verbose . mkCronSchedule
test/System/Test/Cron/Schedule.hs view
@@ -32,9 +32,10 @@   , testCase "should read all three jobs." $       length s @?= 3   ]-  where Right ((), s) = runSchedule $ do addJob noop "* * * * *"-                                         addJob noop "0 * * * *"-                                         addJob noop "0 0 * * *"+  where ((), s) = either (error . show) id $ runSchedule $ do+                    addJob noop "* * * * *"+                    addJob noop "0 * * * *"+                    addJob noop "0 0 * * *"         noop = return ()  describeExecSchedule :: TestTree