diff options
| author | Andrew Dunning <adunning@users.noreply.github.com> | 2016-03-30 14:15:47 +0100 |
|---|---|---|
| committer | Andrew Dunning <adunning@users.noreply.github.com> | 2016-03-30 14:15:47 +0100 |
| commit | 0c37a7c4881fd5018fd5b60588c9899b11bbb86a (patch) | |
| tree | 529bb3e6bf9e02d6e1f91bc73cc7d0e576276575 /src/Text/Pandoc/Writers/LaTeX.hs | |
| parent | 32ecd195bda8af679464361f541a333d03656dc0 (diff) | |
Recognize `la-x-classic` as Classical Latin.
This allows one to access the hyphenation patterns at <http://mirrors.ctan.org/language/hyph-utf8/tex/generic/hyph-utf8/patterns/tex/hyph-la-x-classic.tex>, using its private language tag.
Diffstat (limited to 'src/Text/Pandoc/Writers/LaTeX.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/LaTeX.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index 693de93fa..9526333c1 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -1153,6 +1153,7 @@ toPolyglossia ("en":"UK":_) = ("english", "variant=british") toPolyglossia ("en":"US":_) = ("english", "variant=american") toPolyglossia ("grc":_) = ("greek", "variant=ancient") toPolyglossia ("hsb":_) = ("usorbian", "") +toPolyglossia ("la":"x-classic":_) = ("latin", "variant=classic") toPolyglossia ("sl":_) = ("slovenian", "") toPolyglossia x = (commonFromBcp47 x, "") @@ -1177,6 +1178,7 @@ toBabel ("fr":"CA":_) = "canadien" toBabel ("fra":"aca":_) = "acadian" toBabel ("grc":_) = "polutonikogreek" toBabel ("hsb":_) = "uppersorbian" +toBabel ("la":"x-classic":_) = "classiclatin" toBabel ("sl":_) = "slovene" toBabel x = commonFromBcp47 x |