Need month names and abbreviations for "All" languages of the world!
[1/2] from: gjones05::mail::orion::org at: 31-May-2001 11:43
Hi fellow REBOLers,
Thorsten Moeller discovered that the FTP scheme in REBOL will not
correctly read from his German file server because the month
abbreviations are different from the English versions included in REBOL.
We are working to patch the FTP scheme so that any ftp file server
language abbreviation can be accommodated. I used AltaVista's BabelFish
to find possible month names in the languages that it translates
between, but I cannot verify these names, nor the expected 3 letter
abbreviation. I've included a tentative list below from which to work.
Please excuse the likely errors and *make alterations* that are
necessary. And, as importantly, please add the bulk of the languages
that are not included (I can readily think of the following countries
represented on the list: Sweden, Czech Rep., Netherlands, Belgium,
Japan, Denmark, Brazil, Slovak Rep., Russia), especially if you know
that "Internationalized" versions of OSes use languages other than
English.
Thanks in advance!
--Scott Jones
Tentative List of Language Month Names and Abbreviations:
English:
--------
January February March April May June
July August September October November December
Spanish:
--------
Enero Febrero Marcha Abril Mayo Junio
Julio Agosto Septiembre Octubre Noviembre Diciembre
French:
-------
Janvier Février Mars Avril Mai Juin
Juillet Août Septembre Octobre Novembre Décembre
German:
-------
Januar Februar März April Mai Juni
Juli August September Oktober November Dezember
Italian:
--------
Gennaio Febbraio Marzo Aprile Maggio Giugno
Luglio Agosto Settembre Ottobre Novembre Dicembre
Portuguese:
----------
Janeiro Fevereiro Março Abril Maio Junho
Julho Agosto Setembro Outubro Novembro Dezembro
(This tentative 3 letter abbreviation list requires viewing
with a fized width font in order for the columns to line up.)
Eng Spa Fre Ger Ita Por
--- --- --- --- --- ---
Jan Ene Jan Jan Gen Jan
Feb Feb Fév Feb Feb Fev
Mar Mar Mar Mär Mar Mar
Apr Abr Avr Apr Apr Abr
May May Mai Mai Mag Mai
Jun Jun Jui Jun Giu Jun
Jul Jul Jui Jul Lug Jul
Aug Ago Aoû Aug Ago Ago
Sep Sep Sep Sep Set Set
Oct Oct Oct Oct Ott Out
Nov Nov Nov Nov Nov Nov
Dec Dic Déc Dez Dez Dez
[2/2] from: sterling:rebol at: 31-May-2001 10:40
Great!
Here's a completed convert-month function then:
convert-month: func [month [string!] /local conv seek] [
conv: [
"Ene" "Gen" ["Jan"]
"Fév" "Fev" ["Feb"]
"Mär" ["Mar"]
"Avr" "Abr" ["Apr"]
"Mag" "Mai" ["May"]
"Jui" "Giu" ["Jun"]
"Lug" ["Jul"]
"Aoû" "Ago" ["Aug"]
"Set" ["Sep"]
"Ott" "Out" ["Oct"]
; ["Nov"] ; none here
"Dic" "Déc" "Dez" ["Dec"]
]
if seek: find conv month [return first find seek block!]
month
]
Sterling