Formatting

This commit is contained in:
Chris Allen 2014-08-15 14:41:03 -05:00
parent 9c662b1ca5
commit 09b0d1a5ce

View File

@ -361,6 +361,8 @@ main = hspec $ do
(CacheName "test") False (CacheKey "key")
let search = mkSearch Nothing (Just filter)
searchExpectNoResults search
describe "ToJSON RegexpFlags" $ do
it "generates the correct JSON for AllRegexpFlags" $
toJSON AllRegexpFlags `shouldBe` String "ALL"