Add greek to Setup.hs and the web apps

This commit is contained in:
hallgren
2013-04-26 13:42:01 +00:00
parent c841c2c3c9
commit b88065e250
3 changed files with 10 additions and 4 deletions

View File

@@ -221,6 +221,7 @@ langsCoding = [
(("english", "Eng"),""),
(("finnish", "Fin"),""),
(("french", "Fre"),""),
(("greek", "Gre"),""),
(("hebrew", "Heb"),""),
(("hindi", "Hin"),"to_devanagari"),
(("german", "Ger"),""),
@@ -254,7 +255,7 @@ langsLang = langs -- `except` ["Amh","Ara","Lat","Tur","Mlt"]
--langsLang = langs `only` ["Fin"] --test
-- languagues that have notpresent marked
langsPresent = langsLang `except` ["Chi","Heb","Jpn","Mlt","Nep","Pes","Snd","Tha","Thb"]
langsPresent = langsLang `except` ["Chi","Gre","Heb","Jpn","Mlt","Nep","Pes","Snd","Tha","Thb"]
-- languages for which to compile Try
langsAPI = langsLang `except` langsIncomplete -- ["Ina","Mlt","Amh","Ara"]

View File

@@ -576,8 +576,11 @@ function lang1(name) {
var ws=name.split("/");
return ws.length==1 ? lang(name.substr(0,3),name) : lang(ws[0],ws[1]);
}
// Language names and 3-letter ISO-639 codes
// See http://en.wikipedia.org/wiki/List_of_ISO_639-1_codes
var languages =
map(lang1,"Amharic Arabic Bulgarian Catalan Chinese Danish Dutch English Finnish French German Hindi Ina/Interlingua Italian Jpn/Japanese Latin Norwegian Polish Ron/Romanian Russian Spanish Swedish Thai Turkish Urdu".split(" "));
map(lang1,"Amharic Arabic Bulgarian Catalan Chinese Danish Dutch English Finnish French German Greek Hindi Ina/Interlingua Italian Jpn/Japanese Latin Norwegian Polish Ron/Romanian Russian Spanish Swedish Thai Turkish Urdu".split(" "));
languages.push(lang("Other","Other"));
var langname={};

View File

@@ -1028,8 +1028,8 @@ function show_translation(o) {
/* --- Auxiliary functions -------------------------------------------------- */
function lang(code,name,code2) { return {code:code, name:name, code2:code2} }
function lang1(namecode2) {
function lang(code,name,code2) {return {code:code, name:name, code2:code2}}
var nc=namecode2.split(":");
var name=nc[0]
var ws=name.split("/");
@@ -1038,8 +1038,10 @@ function lang1(namecode2) {
: lang(ws[0],ws[1],code2);
}
// Language names and ISO-639 codes (both 3-letter and 2-letter codes)
// See http://en.wikipedia.org/wiki/List_of_ISO_639-1_codes
var languages = // [ISO-639-2 code "/"] language name ":" ISO 639-1 code
map(lang1,"Amharic:am Arabic:ar Bulgarian:bg Catalan:ca Chinese:zh Danish:da Dutch:nl English:en Finnish:fi French:fr German:de Hindi:hi Ina/Interlingua:ia Italian:it Jpn/Japanese:ja Latin:la Norwegian:nb Polish:pl Ron/Romanian:ro Russian:ru Spanish:es Swedish:sv Thai:th Turkish:tr Urdu:ur".split(" "));
map(lang1,"Amharic:am Arabic:ar Bulgarian:bg Catalan:ca Chinese:zh Danish:da Dutch:nl English:en Finnish:fi French:fr German:de Greek:el Hindi:hi Ina/Interlingua:ia Italian:it Jpn/Japanese:ja Latin:la Norwegian:nb Polish:pl Ron/Romanian:ro Russian:ru Spanish:es Swedish:sv Thai:th Turkish:tr Urdu:ur".split(" "));
var langname={};
var langcode2={}