@@ -47,16 +47,16 @@ tests = [ testGroup "inline code"
47 , testGroup "backslash escapes"
47 , testGroup "backslash escapes"
48 [ "in URL" =:
48 [ "in URL" =:
49 "[hi](/there\\))"
49 "[hi](/there\\))"
50− =?> para (link "hi" "/there)" "")
50+ =?> para (link "/there)" "" "hi")
51 , "in title" =:
51 , "in title" =:
52 "[hi](/there \"a\\\"a)"
52 "[hi](/there \"a\\\"a)"
53− =?> para (link "hi" "/there" "a\"a")
53+ =?> para (link "/there" "a\"a" "hi")
54 , "in reference link title" =:
54 , "in reference link title" =:
55 "[hi]\n\n[hi]: /there (a\\)a)"
55 "[hi]\n\n[hi]: /there (a\\)a)"
56− =?> para (link "hi" "/there" "a)a")
56+ =?> para (link "/there" "a)a" "hi")
57 , "in reference link URL" =:
57 , "in reference link URL" =:
58 "[hi]\n\n[hi]: /there\\."
58 "[hi]\n\n[hi]: /there\\."
59− =?> para (link "hi" "/there." "")
59+ =?> para (link "/there." "" "hi")
61 , testGroup "smart punctuation"
61 , testGroup "smart punctuation"
62 [ test markdownSmart "quote before ellipses"
62 [ test markdownSmart "quote before ellipses"