diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2014-08-26 22:18:50 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2014-08-26 22:18:50 -0700 |
| commit | 5a6e0d3a08e887ce6d5251f07dd29ea4e70000b5 (patch) | |
| tree | b7e3fd12a65fef5db73d8fc612d5b7550a8ebad4 | |
| parent | 9f8051d95d4353c1f7df9bf30024ba5f60e1477f (diff) | |
| parent | f813755c550cb0e0297e8a3ce4c77b87ed6e3571 (diff) | |
| download | pandoc-5a6e0d3a08e887ce6d5251f07dd29ea4e70000b5.tar.gz | |
Merge pull request #1565 from Chobbes/master
Org exampleLine parser accepts indented example lines!
| -rw-r--r-- | src/Text/Pandoc/Readers/Org.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Org.hs b/src/Text/Pandoc/Readers/Org.hs index e1c29d1e8..62421d2fb 100644 --- a/src/Text/Pandoc/Readers/Org.hs +++ b/src/Text/Pandoc/Readers/Org.hs @@ -483,7 +483,7 @@ exampleCode :: String -> Blocks exampleCode = B.codeBlockWith ("", ["example"], []) exampleLine :: OrgParser String -exampleLine = try $ string ": " *> anyLine +exampleLine = try $ skipSpaces *> string ": " *> anyLine -- Drawers for properties or a logbook drawer :: OrgParser (F Blocks) |