aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2025-08-26 18:57:14 +0200
committerJohn MacFarlane <[email protected]>2025-08-26 18:57:14 +0200
commit6cff8dfc8af7a20afe8b307e29c010db7b6053d8 (patch)
tree13371d352a099555d9493dab94dc993d60756b47 /test
parent01f97ed55d7914a120b552c046a671c4623d7cd8 (diff)
HTML reader: don't drop the initial newline in a pre element.
Closes #11064.
Diffstat (limited to 'test')
-rw-r--r--test/Tests/Readers/HTML.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/test/Tests/Readers/HTML.hs b/test/Tests/Readers/HTML.hs
index 5b7ab12fd..7c075de0b 100644
--- a/test/Tests/Readers/HTML.hs
+++ b/test/Tests/Readers/HTML.hs
@@ -130,10 +130,10 @@ tests = [ testGroup "base tag"
[ test html "attributes in pre > code element" $
"<pre><code id=\"a\" class=\"python\">\nprint('hi')\n</code></pre>"
=?>
- codeBlockWith ("a", ["python"], []) "print('hi')"
+ codeBlockWith ("a", ["python"], []) "\nprint('hi')"
, test html "attributes in pre take precedence" $
- "<pre id=\"c\"><code id=\"d\">\nprint('hi mom!')\n</code></pre>"
+ "<pre id=\"c\"><code id=\"d\">print('hi mom!')\n</code></pre>"
=?>
codeBlockWith ("c", [], []) "print('hi mom!')"
]