Fix language code for Czech (cs not cz)

Closes #2597.
2015-12-19 17:53:58 -08:00 · 2015-12-19 17:53:58 -08:00 · 770641f741
commit 770641f741
parent 2998618e39
2 changed files with 1 additions and 2 deletions
--- a/src/Text/Pandoc/Writers/ConTeXt.hs
+++ b/src/Text/Pandoc/Writers/ConTeXt.hs
@ -439,7 +439,6 @@ fromBcp47 ("en":"GB":_)   = "en-gb"
 fromBcp47 ("grc":_)       = "agr"
 fromBcp47 x               = fromIso $ head x
  where
-    fromIso "cz" = "cs"
    fromIso "el" = "gr"
    fromIso "eu" = "ba"
    fromIso "he" = "il"
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@ -1182,7 +1182,7 @@ commonFromBcp47 x = fromIso $ head x
    fromIso "br"  = "breton"
    fromIso "ca"  = "catalan"
    fromIso "cy"  = "welsh"
-    fromIso "cz"  = "czech"
+    fromIso "cs"  = "czech"
    fromIso "cop" = "coptic"
    fromIso "da"  = "danish"
    fromIso "dv"  = "divehi"