morpheus-graphql-tests 0.27.3 → 0.28.0
raw patch · 4 files changed
+32/−9 lines, 4 filesdep ~bytestringdep ~tasty
Dependency ranges changed: bytestring, tasty
Files
- LICENSE +21/−0
- morpheus-graphql-tests.cabal +6/−4
- src/Test/Morpheus.hs +1/−1
- src/Test/Morpheus/Utils.hs +4/−4
+ LICENSE view
@@ -0,0 +1,21 @@+MIT License++Copyright (c) 2019 Daviti Nalchevanidze++Permission is hereby granted, free of charge, to any person obtaining a copy+of this software and associated documentation files (the "Software"), to deal+in the Software without restriction, including without limitation the rights+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell+copies of the Software, and to permit persons to whom the Software is+furnished to do so, subject to the following conditions:++The above copyright notice and this permission notice shall be included in all+copies or substantial portions of the Software.++THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE+SOFTWARE.
morpheus-graphql-tests.cabal view
@@ -1,12 +1,13 @@ cabal-version: 1.12 --- This file has been generated from package.yaml by hpack version 0.35.0.+-- This file has been generated from package.yaml by hpack version 0.36.0. -- -- see: https://github.com/sol/hpack name: morpheus-graphql-tests-version: 0.27.3+version: 0.28.0 synopsis: Morpheus GraphQL Test+description: test utils for morpheus graphql category: web, graphql, test homepage: https://morpheusgraphql.com bug-reports: https://github.com/nalchevanidze/morpheus-graphql/issues@@ -14,6 +15,7 @@ maintainer: d.nalchevanidze@gmail.com copyright: (c) 2019 Daviti Nalchevanidze license: MIT+license-file: LICENSE build-type: Simple source-repository head@@ -35,10 +37,10 @@ build-depends: aeson >=1.4.4 && <3.0.0 , base >=4.7.0 && <5.0.0- , bytestring >=0.10.4 && <0.12.0+ , bytestring >=0.10.4 && <0.15.0 , directory >=1.0.0 && <2.0.0 , relude >=0.3.0 && <2.0.0- , tasty >=0.1.0 && <1.5.0+ , tasty >=0.1.0 && <=1.5 , tasty-hunit >=0.1.0 && <1.0.0 , text >=1.2.3 && <3.0.0 , unordered-containers >=0.2.8 && <0.3.0
src/Test/Morpheus.hs view
@@ -153,7 +153,7 @@ [FilePath] -> IO b getAppsWIth f url [] = getAppBy f url-getAppsWIth f url (x : xs) = sconcat <$> traverse (getAppBy f) (file url <$> (x :| xs))+getAppsWIth f url (x : xs) = sconcat <$> traverse (getAppBy f . file url) (x :| xs) getAppsBy :: (Semigroup b, Show err, FromJSON resolvers) =>
src/Test/Morpheus/Utils.hs view
@@ -40,7 +40,7 @@ ( assertFailure, ) -readSchemaFile :: ReadSource t => FileUrl -> IO t+readSchemaFile :: (ReadSource t) => FileUrl -> IO t readSchemaFile = readGQL "schema" runCaseTree :: (FileUrl -> [FileUrl] -> [TestTree]) -> CaseTree [FileUrl] -> TestTree@@ -54,7 +54,7 @@ foldCaseTree f CaseTree {caseUrl = FileUrl {fileName}, children} = testGroup fileName (fmap (foldCaseTree f) children) -recursiveScan :: Monoid assets => (FileUrl -> IO assets) -> FileUrl -> IO (CaseTree assets)+recursiveScan :: (Monoid assets) => (FileUrl -> IO assets) -> FileUrl -> IO (CaseTree assets) recursiveScan scanAssets caseUrl = do dir <- isDirectory caseUrl children <-@@ -100,7 +100,7 @@ readSchemaFile url >>= assertValidSchema . f -assertValidSchema :: Show err => Either err a -> IO a+assertValidSchema :: (Show err) => Either err a -> IO a assertValidSchema = either ( assertFailure@@ -111,5 +111,5 @@ ) pure -getResolver :: FromJSON resolver => FileUrl -> IO resolver+getResolver :: (FromJSON resolver) => FileUrl -> IO resolver getResolver url = readJSON "resolvers" url >>= either fail pure . eitherDecode