diff options
Diffstat (limited to 'src/Text/Pandoc/GroffChar.hs')
-rw-r--r-- | src/Text/Pandoc/GroffChar.hs | 31 |
1 files changed, 16 insertions, 15 deletions
diff --git a/src/Text/Pandoc/GroffChar.hs b/src/Text/Pandoc/GroffChar.hs index 669b2b4a0..8664c627f 100644 --- a/src/Text/Pandoc/GroffChar.hs +++ b/src/Text/Pandoc/GroffChar.hs @@ -1,4 +1,5 @@ {-# LANGUAGE NoImplicitPrelude #-} +{-# LANGUAGE OverloadedStrings #-} {- Copyright (C) 2018 John MacFarlane <jgm@berkeley.edu> @@ -400,19 +401,19 @@ characterCodes = -- use like: \\[E a^ aa] combiningAccents :: [(Char, String)] combiningAccents = - [ ('˝' , "\\[a\"]") - , ('¯', "\\[a-]") - , ('˙', "\\[a.]") - , ('^', "\\[a^]") - , ('´', "\\[aa]") - , ('`', "\\[ga]") - , ('˘', "\\[ab]") - , ('¸', "\\[ac]") - , ('¨', "\\[ad]") - , ('ˇ', "\\[ah]") - , ('˚', "\\[ao]") - , ('~', "\\[a~]") - , ('˛', "\\[ho]") - , ('^', "\\[ha]") - , ('~', "\\[ti]") + [ ('˝' , "a\"") + , ('¯', "a-") + , ('˙', "a.") + , ('^', "a^") + , ('´', "aa") + , ('`', "ga") + , ('˘', "ab") + , ('¸', "ac") + , ('¨', "ad") + , ('ˇ', "ah") + , ('˚', "ao") + , ('~', "a~") + , ('˛', "ho") + , ('^', "ha") + , ('~', "ti") ] |