@@ -48,6 +48,9 @@ tests = [ testGroup "inline code"
48 [ "in URL" =:
48 [ "in URL" =:
49 "[hi](/there\\))"
49 "[hi](/there\\))"
50 =?> para (link "hi" "/there)" "")
50 =?> para (link "hi" "/there)" "")
52+ "[hi](/there \"a\\\"a)"
53+ =?> para (link "hi" "/there" "a\"a")
52 , testGroup "smart punctuation"
55 , testGroup "smart punctuation"
53 [ test markdownSmart "quote before ellipses"
56 [ test markdownSmart "quote before ellipses"