cron 0.1.1 → 0.1.2

raw patch · 2 files changed

+7/−8 lines, 2 filesdep +hspec-expectationsdep ~text

Dependencies added: hspec-expectations

Dependency ranges changed: text

Files

• cron.cabal +5/−4
• test/System/Cron/ParserSpec.hs +2/−4

@@ -1,5 +1,5 @@ Name:                cron-Version:             0.1.1+Version:             0.1.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@@ -16,7 +16,7 @@ License:             MIT License-file:        LICENSE Author:              Michael Xavier <michael@michaelxavier.net>-Copyright:           Copyright: (c) 2012 Michael Xavier+Copyright:           Copyright: (c) 2012-2014 Michael Xavier Maintainer:          Michael Xavier <michael@michaelxavier.net> Build-Type:          Simple Stability:           experimental@@ -38,7 +38,7 @@  Hs-source-dirs:  src  build-depends:   base            >= 4 && < 5,                   attoparsec      == 0.10.*,-                  text            == 0.11.*,+                  text            >= 0.11 && < 2,                   time            >= 1.4  test-suite spec@@ -48,8 +48,9 @@   Build-Depends:  base >= 4 && < 5,                   cron,                   hspec == 1.3.*,+                  hspec-expectations,                   attoparsec      == 0.10.*,-                  text            == 0.11.*,+                  text            >= 0.11 && < 2,                   time            >= 1.4  source-repository head

@@ -8,6 +8,7 @@  import System.Cron import System.Cron.Parser+import Test.Hspec.Expectations.Contrib (isLeft)  spec :: Spec spec = sequence_ [describeCronSchedule,@@ -156,10 +157,7 @@                  => Parser a                  -> Text                  -> Expectation-assertNoParse parser txt = isLeft parsed `shouldBe` True-  where isLeft (Left _) = True-        isLeft _        = False-        parsed          = parseOnly parser txt+assertNoParse parser txt = parseOnly parser txt `shouldSatisfy` isLeft  envSet :: CrontabEntry envSet = EnvVariable "FOO" "BAR"