diff options
| author | Julia Diaz <julia.diaz@gmail.com> | 2023-08-10 22:02:43 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2023-08-10 13:02:43 -0700 |
| commit | 6673f832ea6bb2498f588b78eb6fb8c099fb408a (patch) | |
| tree | aff547ab132cbc6cec63eb569de19f222e5961e1 /test/Tests | |
| parent | cbb33fefb758250e745d9795ce97cc91e293626a (diff) | |
Fix display of block elements in JATS reader (PR #8971)
A number of block elements, like disp-quote, list, and disp-formula, were always treated as inlines if appearing inside paragraphs, even if their usage granted a separate block. The function isElementBlock has been refined to prevent this, and a number of specific parse cases have been added to parseBlock.
Also, some minimal cleanup of the test file, in order for it to pass XML validation against the JATS DTD 1.3 (it was not compliant with the current or any previous versions of JATS).
Closes #8889.
Diffstat (limited to 'test/Tests')
| -rw-r--r-- | test/Tests/Readers/JATS.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/test/Tests/Readers/JATS.hs b/test/Tests/Readers/JATS.hs index a9c9a0586..b7d36dc00 100644 --- a/test/Tests/Readers/JATS.hs +++ b/test/Tests/Readers/JATS.hs @@ -27,7 +27,6 @@ jats = purely $ readJATS def tests :: [TestTree] tests = [ testGroup "inline code" [ test jats "basic" $ "<p>\n <monospace>@&</monospace>\n</p>" =?> para (code "@&") - , test jats "lang" $ "<p>\n <code language=\"c\">@&</code>\n</p>" =?> para (codeWith ("", ["c"], []) "@&") ] , testGroup "block code" [ test jats "basic" $ "<preformat>@&</preformat>" =?> codeBlock "@&" |