diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2018-07-23 22:05:41 +0200 |
|---|---|---|
| committer | Albert Krewinkel <albert@zeitkraut.de> | 2018-07-23 22:05:41 +0200 |
| commit | 4e899eb9c886df2200551f69a3f593ab5258f2e2 (patch) | |
| tree | a69843f3eb020d46eeecc91ef7da31800f9b68b3 /test | |
| parent | a85877424bde7365a0cbb4ca99f9569110de92b4 (diff) | |
| download | pandoc-4e899eb9c886df2200551f69a3f593ab5258f2e2.tar.gz | |
Org reader: fix parsers relying on parseFromString
Emphasis was not parsed when it followed directly after some block types
(e.g., lists).
The org reader uses a wrapper for the `parseFromString` function to
handle org-specific state. The last position of a character allowed
before emphasis was reset incorrectly in this wrapper. Emphasized text
was not recognized when placed directly behind a block which the reader
parses using `parseFromString`.
Fixes: #4784
Diffstat (limited to 'test')
| -rw-r--r-- | test/Tests/Readers/Org/Block/List.hs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/test/Tests/Readers/Org/Block/List.hs b/test/Tests/Readers/Org/Block/List.hs index f273b684d..bdab01404 100644 --- a/test/Tests/Readers/Org/Block/List.hs +++ b/test/Tests/Readers/Org/Block/List.hs @@ -243,4 +243,15 @@ tests = mconcat [ para "CLOSED: [2015-10-19 Mon 15:03]" , bulletList [ plain "Note taken on [2015-10-19 Mon 13:24]" ] ] + + , "Markup after header and list" =: + T.unlines [ "* headline" + , "- list" + , "" + , "~variable name~" + ] =?> + mconcat [ headerWith ("headline", [], []) 1 "headline" + , bulletList [ plain "list" ] + , para (code "variable name") + ] ] |