Fixed badly named test group in Yesod.Utils
This commit is contained in:
parent
2eb6f2f05b
commit
ab65accb44
@ -46,7 +46,7 @@ tryLookup def key = fromMaybe def . lookup key
|
|||||||
#if TEST
|
#if TEST
|
||||||
----- Testing
|
----- Testing
|
||||||
testSuite :: Test
|
testSuite :: Test
|
||||||
testSuite = testGroup "Yesod.Response"
|
testSuite = testGroup "Yesod.Utils"
|
||||||
[ testCase "tryLookup1" caseTryLookup1
|
[ testCase "tryLookup1" caseTryLookup1
|
||||||
, testCase "tryLookup2" caseTryLookup2
|
, testCase "tryLookup2" caseTryLookup2
|
||||||
]
|
]
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user