aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests/Readers
diff options
context:
space:
mode:
authorAlbert Krewinkel <tarleb@moltkeplatz.de>2014-04-05 09:37:46 +0200
committerAlbert Krewinkel <tarleb@moltkeplatz.de>2014-04-05 16:14:40 +0200
commitfd98532784e43ad73072f37a31af5ff40fdc1c56 (patch)
tree5ac04942cca646256f54b1334e9c63d74e396ab0 /tests/Tests/Readers
parentd43c3e81017734170fb25460c4b9ab9cccb1e0db (diff)
downloadpandoc-fd98532784e43ad73072f37a31af5ff40fdc1c56.tar.gz
Org reader: Fix parsing of nested inlines
Text such as /*this*/ was not correctly parsed as a strong, emphasised word. This was due to the end-of-word recognition being to strict as it did not accept markup chars as part of a word. The fix involves an additional parser state field, listing the markup chars which might be parsed as part of a word.
Diffstat (limited to 'tests/Tests/Readers')
-rw-r--r--tests/Tests/Readers/Org.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs
index 8c5982302..9091d9c74 100644
--- a/tests/Tests/Readers/Org.hs
+++ b/tests/Tests/Readers/Org.hs
@@ -42,6 +42,10 @@ tests =
"*Cider*" =?>
para (strong "Cider")
+ , "Strong Emphasis" =:
+ "/*strength*/" =?>
+ para (emph . strong $ "strength")
+
, "Strikeout" =:
"+Kill Bill+" =?>
para (strikeout . spcSep $ [ "Kill", "Bill" ])