diff options
| author | John MacFarlane <[email protected]> | 2022-07-11 23:58:13 +0200 |
|---|---|---|
| committer | John MacFarlane <[email protected]> | 2022-07-11 23:58:13 +0200 |
| commit | cf57a8344a13fcdd67a94a08b3edc427be77dc2e (patch) | |
| tree | cbf4f0bac32aee481aba962d9312aaf31ed96ddc /src | |
| parent | 05ab2060d69441b26e8cd54f8bf75e5e9561b70f (diff) | |
Fix roff ms syntax highlighting definitions.
Begin each string definition with `\&`.
Closes #8175. Thanks to Branden Robinson.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/Ms.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs index c5fdf30ed..28b2c438c 100644 --- a/src/Text/Pandoc/Writers/Ms.hs +++ b/src/Text/Pandoc/Writers/Ms.hs @@ -578,7 +578,7 @@ hexColor (RGB r g b) = T.pack $ printf "%02x%02x%02x" r g b toMacro :: Style -> TokenType -> Doc Text toMacro sty toktype = - nowrap (literal ".ds " <> literal (tshow toktype) <> literal " " <> + nowrap (literal ".ds " <> literal (tshow toktype) <> literal " \\&" <> setbg <> setcolor <> setfont <> literal "\\\\$1" <> resetfont <> resetcolor <> resetbg) |