@@ -44,7 +44,7 @@ tests :: [TestTree]
4444tests = [ testGroup "inline code"
4545 [ "with '}'" =: code "}" =?> "\\mono{\\}}"
4646 , "without '}'" =: code "]" =?> "\\type{]}"
47− , testProperty "code property" $ \s -> null s ||
47+ , testProperty "code property" $ \s -> null s || '\n' `elem` s ||
4848 if '{' `elem` s || '}' `elem` s
4949 then context' (code s) == "\\mono{" ++
5050 context' (str s) ++ "}"