diff options
| -rw-r--r-- | src/Text/Pandoc/GroffChar.hs | 27 |
1 files changed, 21 insertions, 6 deletions
diff --git a/src/Text/Pandoc/GroffChar.hs b/src/Text/Pandoc/GroffChar.hs index 97ff0b100..6d7991e5d 100644 --- a/src/Text/Pandoc/GroffChar.hs +++ b/src/Text/Pandoc/GroffChar.hs @@ -396,12 +396,7 @@ characterCodes = , ('♠', "SP") , ('♥', "HE") , ('♦', "DI") - ] - --- use like: \\[E a^ aa] -combiningAccents :: [(Char, String)] -combiningAccents = - [ ('˝' , "a\"") + , ('˝' , "a\"") , ('¯', "a-") , ('˙', "a.") , ('^', "a^") @@ -417,3 +412,23 @@ combiningAccents = , ('^', "ha") , ('~', "ti") ] + +-- use like: \\[E a^ aa] +combiningAccents :: [(Char, String)] +combiningAccents = + [ ('\779' , "a\"") + , ('\772', "a-") + , ('\775', "a.") + , ('\770', "a^") + , ('\769', "aa") + , ('\768', "ga") + , ('\774', "ab") + , ('\807', "ac") + , ('\776', "ad") + , ('\780', "ah") + , ('\778', "ao") + , ('\771', "a~") + , ('\808', "ho") + , ('\770', "ha") + , ('\771', "ti") + ] |