summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/xelatex/xgreek
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2017-02-13 23:22:29 +0000
committerKarl Berry <karl@freefriends.org>2017-02-13 23:22:29 +0000
commit06a80c60d8760ed6c1a3559d91cbaf54e434f597 (patch)
treee1574005686893787d78730b596b526188547a4f /Master/texmf-dist/tex/xelatex/xgreek
parentba74de022219d81d222baaf16a5e55c55ec4016e (diff)
xgreek (13feb17)
git-svn-id: svn://tug.org/texlive/trunk@43222 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/xelatex/xgreek')
-rw-r--r--Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty40
1 files changed, 24 insertions, 16 deletions
diff --git a/Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty b/Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty
index 048d061dbb1..c20274f9ab8 100644
--- a/Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty
+++ b/Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty
@@ -6,7 +6,7 @@
%%
%% xgreek.dtx (with options: `xgreek')
%%
-%% (c) Copyright 2007—2016 Apostolos Syropoulos
+%% (c) Copyright 2007—2017 Apostolos Syropoulos
%% This program can be redistributed and/or modified under the
%% terms of the LaTeX Project Public License Distributed from
%% http://www.latex-project.org/lppl.txt; either
@@ -35,8 +35,8 @@
%% Right brace \} Tilde \~}
%%
\ProvidesFile{xgreek.sty}
- [2016/04/28 v2.7 Package `xgreek.sty']
-\message{Package `xgreek' version 2.7 by Apostolos Syropoulos}
+ [2017/02/10 v3.0 Package `xgreek.sty']
+\message{Package `xgreek' version 3.0 by Apostolos Syropoulos}
\global\lccode"0370="0371 \global\uccode"0370="0370
\global\lccode"0371="0371 \global\uccode"0371="0370
\global\lccode"0372="0373 \global\uccode"0372="0372
@@ -432,16 +432,20 @@
\let\@saveafterindentfalse\@afterindentfalse
\let\@afterindentfalse\@afterindenttrue
\@afterindenttrue
+\ifx\directlua\undefined\else\RequirePackage{luahyphenrules}\fi
\DeclareOption{monogreek}{%
- \language\l@monogreek%
+ \ifx\directlua\undefined%
+ \language\l@monogreek\else\HyphenRules{monogreek}\fi%
}
\DeclareOption{polygreek}{%
- \language\l@polygreek%
+ \ifx\directlua\undefined%
+ \language\l@polygreek\else\HyphenRules{polygreek}\fi%
\polytonicn@mes%
\let\gr@month\gr@c@month%
}
\DeclareOption{ancientgreek}{%
- \language\l@ancientgreek%
+ \ifx\directlua\undefined%
+ \language\l@ancientgreek\else\HyphenRules{ancientgreek}\fi%
\@ncientn@mes%
\let\gr@month\gr@c@month%
}
@@ -533,21 +537,21 @@
Value too large (\the\@attic@num) for acrophonic Attic numeral}%
\else
\@whilenum\@attic@num>49999\do{%
- ^^^^^10147\advance\@attic@num-50000}%
+ ^^^^^^010147\advance\@attic@num-50000}%
\@whilenum\@attic@num>9999\do{%
M\advance\@attic@num-\@M}%
\ifnum\@attic@num>4999%
- ^^^^^10146\advance\@attic@num-5000%
+ ^^^^^^010146\advance\@attic@num-5000%
\fi\relax
\@whilenum\@attic@num>999\do{%
Χ\advance\@attic@num-\@m}%
\ifnum\@attic@num>499%
- ^^^^^10145\advance\@attic@num-500%
+ ^^^^^^010145\advance\@attic@num-500%
\fi\relax
\@whilenum\@attic@num>99\do{%
Η\advance\@attic@num-100}%
\ifnum\@attic@num>49%
- ^^^^^10144\advance\@attic@num-50%
+ ^^^^^^010144\advance\@attic@num-50%
\fi\relax
\@whilenum\@attic@num>9\do{%
Δ\advance\@attic@num by-10}%
@@ -572,12 +576,16 @@
\def\greekalph{%
\let\@alph\greek@alph
\let\@Alph\greek@Alph}
-\def\setlanguage#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}
+\ifx\directlua\undefined%
+ \def\setlanguage#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}
+\else
+ \let\setlanguage\HyphenRules
+\fi
\def\grtoday{%
\expandafter\greeknumeral\expandafter{\the\day}\space
\gr@c@month\space