diff options
author | Griffin Smith <grfn@gws.fyi> | 2020-06-28T20·43-0400 |
---|---|---|
committer | glittershark <grfn@gws.fyi> | 2020-06-28T23·38+0000 |
commit | 6c7e14d2dcd3a3b124dc035e8feb8e79534cd66a (patch) | |
tree | f551473902e566c03746a8dd2014634a48a2c434 /users/glittershark/xanthous/test | |
parent | 20bc4aa10dffcbcc42139afafa10aa5f7a5090bb (diff) |
feat(xan): Use Witherable in the prelude r/1110
Install the witherable library, expose it in the prelude, and update all call sites that are broken by that change. This is a really nice library, and basically the ideal abstraction layer for what it does. Change-Id: I640e099318c1ecce0ad483bc336c379698bdab88 Reviewed-on: https://cl.tvl.fyi/c/depot/+/725 Reviewed-by: glittershark <grfn@gws.fyi>
Diffstat (limited to 'users/glittershark/xanthous/test')
-rw-r--r-- | users/glittershark/xanthous/test/Xanthous/Messages/TemplateSpec.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/users/glittershark/xanthous/test/Xanthous/Messages/TemplateSpec.hs b/users/glittershark/xanthous/test/Xanthous/Messages/TemplateSpec.hs index 8ea5186c5050..2a3873c3b016 100644 --- a/users/glittershark/xanthous/test/Xanthous/Messages/TemplateSpec.hs +++ b/users/glittershark/xanthous/test/Xanthous/Messages/TemplateSpec.hs @@ -62,7 +62,7 @@ test = testGroup "Xanthous.Messages.Template" ] ] where - genLiteral = filter (`notElem` ['\\', '{']) <$> arbitrary + genLiteral = pack . filter (`notElem` ['\\', '{']) <$> arbitrary parseCase name input expected = testCase name $ testParse template input @?= Right expected testParse p = over _Left errorBundlePretty . runParser p "<test>" |