Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

update list of babelfish translations

  • Loading branch information...
commit 1e484bcf302e71306880b508aabdbe2f33c5dba7 1 parent 8fc5c99
Jürgen Hötzel authored

Showing 1 changed file with 12 additions and 5 deletions. Show diff stats Hide diff stats

  1. 17  babel.el
17  babel.el
@@ -236,7 +236,8 @@
236 236
     ("Belarusian" . "be")
237 237
     ("Bulgarian" . "bg")
238 238
     ("Catalan" . "ca")
239  
-    ("Chinese" . "zh-CN")
  239
+    ("Chinese" . "zh")
  240
+    ("Chinese (trad.)" . "zt")
240 241
     ("Croatian" . "hr")
241 242
     ("Czech" . "cs")
242 243
     ("Danish" . "da")
@@ -763,15 +764,21 @@ If optional argument HERE is non-nil, insert version number at point."
763 764
 (defconst babel-fish-languages
764 765
   '(("en" . "en")
765 766
     ("de" . "de")
  767
+    ("el" . "el")
766 768
     ("it" . "it")
  769
+    ("ja" . "ja")
  770
+    ("ko" . "ko")
  771
+    ("nl" . "nl")
  772
+    ("pt" . "ru")
  773
+    ("zh" . "zh")
  774
+    ("zt" . "zt")
767 775
     ("pt" . "pt")
768 776
     ("es" . "es")
769 777
     ("fr" . "fr")))
770 778
 
771 779
 ;; those inter-language translations that Babelfish is capable of
772 780
 (defconst babel-fish-translations
773  
-  '("en_fr" "en_de" "en_it" "en_pt" "en_es" "fr_en" "de_en" "it_en"
774  
-    "es_en" "pt_en"))
  781
+  '("de_en" "en_de" "de_fr" "fr_de" "en_zh" "en_zt" "en_nl" "en_fr" "en_el" "en_it" "en_ja" "en_ko" "en_pt" "en_ru" "en_es" "es_en" "es_fr" "nl_en" "nl_fr" "fr_nl" "fr_en" "fr_el" "fr_it" "fr_pt" "fr_es" "el_en" "el_fr" "it_en" "it_fr" "ja_en" "ko_en" "pt_en" "pt_fr" "ru_en" "zh_en" "zh_zt" "zt_en" "zt_zh"))
775 782
 
776 783
 ;; if Babelfish is able to translate from language FROM to language
777 784
 ;; TO, then return the corresponding string, otherwise return nil
@@ -819,8 +826,8 @@ If optional argument HERE is non-nil, insert version number at point."
819 826
     ("es" . "Spanish")
820 827
     ("no" . "Norwegian")
821 828
     ("ru" . "Russian")
822  
-    ("zh-CN" . "SimplifiedChinese")
823  
-    ("zh-TW" . "TraditionalChinese")
  829
+    ("zh" . "SimplifiedChinese")
  830
+    ("zh" . "TraditionalChinese")
824 831
     ("fr" . "French")))
825 832
 
826 833
 ;; those inter-language translations that FreeTranslation is capable of

0 notes on commit 1e484bc

Please sign in to comment.
Something went wrong with that request. Please try again.