diff options
Diffstat (limited to 'src/Text/Pandoc/Readers/Org/Inlines.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/Org/Inlines.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Org/Inlines.hs b/src/Text/Pandoc/Readers/Org/Inlines.hs index be7fc600a..80a94f1b3 100644 --- a/src/Text/Pandoc/Readers/Org/Inlines.hs +++ b/src/Text/Pandoc/Readers/Org/Inlines.hs @@ -730,6 +730,7 @@ smart = do singleQuoted :: OrgParser (F Inlines) singleQuoted = try $ do + guard . exportSmartQuotes . orgStateExportSettings =<< getState singleQuoteStart updatePositions '\'' withQuoteContext InSingleQuote $ @@ -741,6 +742,7 @@ singleQuoted = try $ do -- in the same paragraph. doubleQuoted :: OrgParser (F Inlines) doubleQuoted = try $ do + guard . exportSmartQuotes . orgStateExportSettings =<< getState doubleQuoteStart updatePositions '"' contents <- mconcat <$> many (try $ notFollowedBy doubleQuoteEnd >> inline) |