summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/lambda/oinuit
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-12 23:46:22 +0000
committerKarl Berry <karl@freefriends.org>2006-01-12 23:46:22 +0000
commit2a8c0210a3491a41c4ba672c46d215048947638c (patch)
treee918d71abd7c1b6c451ae80cce8b7c380bd3eed2 /Master/texmf-dist/tex/lambda/oinuit
parent284b296e0d543a531f5e69ad826242a7a9e867ab (diff)
trunk/Master/texmf-dist/tex/lambda
git-svn-id: svn://tug.org/texlive/trunk@615 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/lambda/oinuit')
-rw-r--r--Master/texmf-dist/tex/lambda/oinuit/oinuit.sty100
1 files changed, 100 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/lambda/oinuit/oinuit.sty b/Master/texmf-dist/tex/lambda/oinuit/oinuit.sty
new file mode 100644
index 00000000000..a2444870fa7
--- /dev/null
+++ b/Master/texmf-dist/tex/lambda/oinuit/oinuit.sty
@@ -0,0 +1,100 @@
+% (c) copyright 2002 Apostolos Syropoulos
+% This program can be redistributed and/or modified under the terms
+% of the LaTeX Project Public License Distributed from CTAN
+% archives in directory macros/latex/base/lppl.txt; either
+% version 1 of the License, or any later version.
+%
+% Please report errors or suggestions for improvement to
+%
+% Apostolos Syropoulos
+% 366, 28th October Str.
+% GR-671 00 Xanthi, GREECE
+% apostolo@ocean1.ee.duth.gr or apostolo@obelix.ee.duth.gr
+%
+%% onuit.sty
+\IfFileExists{ot1uctt.fd}{%
+ \def\ttdefault{uctt}}{}%
+%
+\DeclareOption{nunavut}{%
+ \ocp\InInuit=Ninuit2uni
+ \ocplist\InInuitList=
+ \addbeforeocplist 1 \InInuit
+ \nullocplist
+}
+%
+\DeclareOption{quebec}{%
+ \ocp\InInuit=Qinuit2uni
+ \ocplist\InInuitList=
+ \addbeforeocplist 1 \InInuit
+ \nullocplist
+}
+%
+\DeclareOption{iscii}{%
+ \ocp\InInuit=inuitscii
+ \ocplist\InInuitList=
+ \addbeforeocplist 1 \InInuit
+ \nullocplist
+}
+%
+\DeclareOption{utf8}{%
+ \ocp\InInuit=inutf8
+ \ocplist\InInuitList=
+ \addbeforeocplist 1 \InInuit
+ \nullocplist
+}
+%
+\DeclareOption{ucs2}{%
+ \ocp\InInuit=id
+ \ocplist\InInuitList=
+ \addbeforeocplist 1 \InInuit
+ \nullocplist
+}
+%
+\ExecuteOptions{nunavut}
+\ProcessOptions
+%
+\input litenc.def
+\def\selectlanguage#1{%
+ \expandafter\ifx\csname l@#1\endcsname\relax%
+ \typeout{^^J Error: No hyphenation pattern for language #1 loaded,}%
+ \typeout{ default hyphenation patterns are used.^^J}%
+ \language=0%
+ \else\language=\csname l@#1\endcsname\fi}
+%
+\def\inuittext{%
+ \fontencoding{LIT}\selectfont%
+ \def\encodingdefault{LIT}%
+ \selectlanguage{inuit}%
+ \pushocplist\InInuitList%
+}
+%
+\newenvironment{inuit}{\fontencoding{LIT}\selectfont%
+ \selectlanguage{inuit}%
+ \pushocplist\InInuitList}%
+ {\popocplist}
+%
+\DeclareRobustCommand{\textinuit}[1]{{%
+ \leavevmode\fontencoding{LIT}\selectfont%
+ \selectlanguage{inuit}%
+ \pushocplist\InInuitList #1}}
+%
+\DeclareRobustCommand{\InuitToday}{{%
+ \fontencoding{LIT}\selectfont%
+ \number\day\space%
+ \ifcase\month%
+ \or ^^^^1528^^^^14c4^^^^140a^^^^1546 %January
+ \or ^^^^1555^^^^1433^^^^140a^^^^1546 %February
+ \or ^^^^14ab^^^^1550^^^^14ef %March
+ \or ^^^^140a^^^^1403^^^^1433^^^^1546^^^^14ea %April
+ \or ^^^^14aa^^^^1403 %May
+ \or ^^^^152a^^^^14c2 %June
+ \or ^^^^152a^^^^14da^^^^1403 %July
+ \or ^^^^140a^^^^1405^^^^148d^^^^1505 %August
+ \or ^^^^14ef^^^^144e^^^^14bb^^^^1433^^^^1546 %September
+ \or ^^^^1505^^^^1483^^^^1450^^^^1433^^^^1546 %October
+ \or ^^^^14c4^^^^1555^^^^14bb^^^^1433^^^^1546 %November
+ \or ^^^^144e^^^^14ef^^^^14bb^^^^1433^^^^1546 %December
+ \fi%
+ \number\year}}
+%
+\endinput