summaryrefslogtreecommitdiff
path: root/Build/source/utils/xindy/make-rules/alphabets/greek/iso88597.pl
diff options
context:
space:
mode:
authorVladimir Volovich <vvv@vsu.ru>2008-03-18 00:00:20 +0000
committerVladimir Volovich <vvv@vsu.ru>2008-03-18 00:00:20 +0000
commitabdd2d2892b5ee0071ef7bf1a387251d74e78055 (patch)
treedc561d5309e02baceac6cc2a7ad9980c7a3a0adf /Build/source/utils/xindy/make-rules/alphabets/greek/iso88597.pl
parent1f50183588e388206c13d505102dbd9525871429 (diff)
*original* xindy-2.3 sources downloaded from
http://surfnet.dl.sourceforge.net/sourceforge/xindy/xindy-2.3.tar.gz except the directory "rte/clisp-2.43/", which contained original clisp-2.43 sources (nearly 48 MB), is removed. git-svn-id: svn://tug.org/texlive/trunk@7003 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/xindy/make-rules/alphabets/greek/iso88597.pl')
-rwxr-xr-xBuild/source/utils/xindy/make-rules/alphabets/greek/iso88597.pl47
1 files changed, 47 insertions, 0 deletions
diff --git a/Build/source/utils/xindy/make-rules/alphabets/greek/iso88597.pl b/Build/source/utils/xindy/make-rules/alphabets/greek/iso88597.pl
new file mode 100755
index 00000000000..1e304dadec3
--- /dev/null
+++ b/Build/source/utils/xindy/make-rules/alphabets/greek/iso88597.pl
@@ -0,0 +1,47 @@
+#!/usr/bin/perl
+
+$language = "Greek";
+$prefix = "el";
+$script = "greek";
+
+$alphabet = [
+['Á', ['á', 'Á'], ['Ü','¶']],
+['Â', ['â', 'Â']],
+['Ã', ['ã', 'Ã']],
+['Ä', ['ä', 'Ä']],
+['Å', ['å', 'Å'], ['Ý','¸']],
+['Æ', ['æ', 'Æ']],
+ [],
+['Ç', ['ç', 'Ç'], ['Þ','¹']],
+['È', ['è', 'È']],
+['É', ['é', 'É'], ['ß','º'], ['ú', 'Ú'], ['À']],
+ [],
+['Ê', ['ê', 'Ê']],
+['Ë', ['ë', 'Ë']],
+['Ì', ['ì', 'Ì']],
+['Í', ['í', 'Í']],
+['Î', ['î', 'Î']],
+['Ï', ['ï', 'Ï'], ['ü','¼']],
+['Ð', ['ð', 'Ð']],
+ [],
+['Ñ', ['ñ', 'Ñ']],
+['Ó', ['ó', 'Ó'], ['ò']],
+['Ô', ['ô', 'Ô']],
+['Õ', ['õ', 'Õ'], ['ý','¾'], ['û', 'Û'], ['à']],
+['Ö', ['ö', 'Ö']],
+['×', ['÷', '×']],
+['Ø', ['ø', 'Ø']],
+['Ù', ['ù', 'Ù'], ['þ', '¿']]
+];
+
+@special = ('?', '!', '.', ';', '·', 'letters', '-', '\'', '\\/');
+
+# first lower or upper case?
+
+$sortcase = "Aa";
+#$sortcase = "aA";
+
+#@letter_group_names = ('Á','Â','Ã','Ä','Å','Æ','Ç','È','É','Ê','Ë','Ì',
+#'Í','Î','Ï','Ð','Ñ','Ó','Ô','Õ','Ö','×','Ø','Ù');
+
+do 'make-rules.pl';