From c1da385941598c8e31f0e3b72f34797afe964bc9 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Tue, 12 Jan 2016 01:02:14 +0000 Subject: minor code cleanup --- bbcode/test/Text/BBCode/LexerSpec.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'bbcode/test/Text/BBCode') diff --git a/bbcode/test/Text/BBCode/LexerSpec.hs b/bbcode/test/Text/BBCode/LexerSpec.hs index 8b95874..b0b77d9 100644 --- a/bbcode/test/Text/BBCode/LexerSpec.hs +++ b/bbcode/test/Text/BBCode/LexerSpec.hs @@ -44,7 +44,7 @@ spec = do zipWithM_ example [1..] examples where example n (s, ts) = let str = "Example " <> show n - in specify str $ (tokenize s == Right ts) + in specify str (tokenize s == Right ts) prop_token :: Text -> Property -- ^ prop> (mconcat . map coToken) <$> tokenize x == Right x -- cgit v1.2.3