diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2020-05-14 09:44:44 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2020-05-14 09:44:44 -0700 |
| commit | 8c026d5ec0b10e92e827baa0e7a7d1533d841cd2 (patch) | |
| tree | 628141662bb06e1abdeb7392f2e69850ddcb2a0a /src/Text/Pandoc/Writers | |
| parent | b3cfdc2c7a363b96c91a8b28f82196984f5f233f (diff) | |
| download | pandoc-8c026d5ec0b10e92e827baa0e7a7d1533d841cd2.tar.gz | |
Fix underline in RTF writer.
It should be `\ul` not `\pnul`.
Diffstat (limited to 'src/Text/Pandoc/Writers')
| -rw-r--r-- | src/Text/Pandoc/Writers/RTF.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/RTF.hs b/src/Text/Pandoc/Writers/RTF.hs index 66a2539c6..55c1b470b 100644 --- a/src/Text/Pandoc/Writers/RTF.hs +++ b/src/Text/Pandoc/Writers/RTF.hs @@ -353,7 +353,7 @@ inlineToRTF (Emph lst) = do return $ "{\\i " <> contents <> "}" inlineToRTF (Underline lst) = do contents <- inlinesToRTF lst - return $ "{\\pnul " <> contents <> "}" + return $ "{\\ul " <> contents <> "}" inlineToRTF (Strong lst) = do contents <- inlinesToRTF lst return $ "{\\b " <> contents <> "}" |