diff options
author | Dimitri Sabadie <dimitri.sabadie@gmail.com> | 2021-01-03 08:57:47 +0100 |
---|---|---|
committer | GitHub <noreply@github.com> | 2021-01-03 08:57:47 +0100 |
commit | 57b10941521d9db808e3892ea9893878065b7c50 (patch) | |
tree | 0b2d440f8e7dcae8c3cfa5a9c342e4579e04ca74 /src/Text/Pandoc/Readers | |
parent | 260aaaacc640cc458259e292c42e15c3d2f34b3f (diff) | |
download | pandoc-57b10941521d9db808e3892ea9893878065b7c50.tar.gz |
Org reader: mark verbatim code with class "verbatim". (#6998)
* Replace org-mode’s verbatim from code to codeWith.
This adds the `"verbatim"` class so that exporters can apply a specific
style on it. For instance, it will be possible for HTML to add a CSS
rule for code + verbatim class.
* Alter test for org-mode’s verbatim change.
See previous commit for further detail on the new implementation.
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r-- | src/Text/Pandoc/Readers/Org/Inlines.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Org/Inlines.hs b/src/Text/Pandoc/Readers/Org/Inlines.hs index 0330cf55f..b819a34a3 100644 --- a/src/Text/Pandoc/Readers/Org/Inlines.hs +++ b/src/Text/Pandoc/Readers/Org/Inlines.hs @@ -572,7 +572,7 @@ underline :: PandocMonad m => OrgParser m (F Inlines) underline = fmap B.underline <$> emphasisBetween '_' verbatim :: PandocMonad m => OrgParser m (F Inlines) -verbatim = return . B.code <$> verbatimBetween '=' +verbatim = return . B.codeWith ("", ["verbatim"], []) <$> verbatimBetween '=' code :: PandocMonad m => OrgParser m (F Inlines) code = return . B.code <$> verbatimBetween '~' |