summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/babel-greek
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/babel-greek')
-rw-r--r--Master/texmf-dist/tex/generic/babel-greek/athnum.sty17
-rw-r--r--Master/texmf-dist/tex/generic/babel-greek/greek.ldf45
2 files changed, 34 insertions, 28 deletions
diff --git a/Master/texmf-dist/tex/generic/babel-greek/athnum.sty b/Master/texmf-dist/tex/generic/babel-greek/athnum.sty
index bbd21dae13c..e662170355e 100644
--- a/Master/texmf-dist/tex/generic/babel-greek/athnum.sty
+++ b/Master/texmf-dist/tex/generic/babel-greek/athnum.sty
@@ -31,14 +31,14 @@
%% The list of derived (unpacked) files belonging to this work
%% and covered by LPPL is defined by the unpacking script (babel-greek.ins)
%% which is part of the package.
-%% \CheckSum{150}
+%% \CheckSum{146}
%% This is file `athnum.dtx'
%% (c) 1997-2007 Apostolos Syropoulos.
-%% Changes in version 2.0 © 2022 Günter Milde
+%% Changes in version 2 © 2022, 2023 Günter Milde
%% All rights reserved.
+%%\title{Athenian (Attic) Numerals}
\NeedsTeXFormat{LaTeX2e}[1996/01/01]
-\ProvidesPackage{athnum}[2022/12/08\space v2.0]
-\typeout{Package: `athnum' v2.0\space <2022/12/08> (A. Syropoulos)}
+\ProvidesPackage{athnum}[2023/03/17 v2.0.1 Athenian numerals]
\ifdefined \UnicodeEncodingName % set by LaTeX for XeTeX/LuaTeX
\providecommand*{\greekfontencoding}{\UnicodeEncodingName}
\providecommand*{\athnum@greek@fontencdef}{tuenc-greek}
@@ -51,10 +51,9 @@
\InputIfFileExists{\athnum@greek@fontencdef .def}{}{% else
\PackageError{athnum}{Font support for the Greek script missing.\\
can't typeset Greek symbols.\\
- Install the "greek-fontenc" package\\
- or use XeTeX/LuaTeX.}
+ Install the "greek-fontenc" package.}
{I can't find the \athnum@greek@fontencdef .def file
- for the Greek fonts (encoding \greekfontencoding)}
+ for the Greek fonts (encoding \greekfontencoding).}
\@@end
}
}
@@ -101,10 +100,10 @@
\def\@athnum#1{%
\expandafter\@@athnum\expandafter{\the#1}}
\def\athnum#1{%
- \ensuregreek{%
+ \textrm{\ensuregreek{%
\@ath@num#1\relax
\@athnum{\@ath@num}}%
- }
+ }}
\endinput
%%
%% End of file `athnum.sty'.
diff --git a/Master/texmf-dist/tex/generic/babel-greek/greek.ldf b/Master/texmf-dist/tex/generic/babel-greek/greek.ldf
index 0c67a235de6..86e98ca0814 100644
--- a/Master/texmf-dist/tex/generic/babel-greek/greek.ldf
+++ b/Master/texmf-dist/tex/generic/babel-greek/greek.ldf
@@ -32,14 +32,15 @@
%% and covered by LPPL is defined by the unpacking script (babel-greek.ins)
%% which is part of the package.
\ProvidesLanguage{greek}
- [2023/03/04 1.12 Greek support for the babel system]
+ [2023/03/17 1.13.1 Greek support for the babel system]
%% File `babel-greek.dtx'
%% Greek language Definition File
%% Copyright © 1997, 2005 Apostolos Syropoulos, Johannes Braams
-%% Copyright © 2013 -- 2020 Günter Milde
+%% Copyright © 2013 -- 2023 Günter Milde
%% Please report errors to: Günter Milde <milde@users.sf.net>
\LdfInit\CurrentOption{captions\CurrentOption}
\gdef\CurrentOption{greek}
+\addto\extrasgreek{\languageshorthands{greek}}
\ifx\l@greek\@undefined
\@nopatterns{greek}
\adddialect\l@greek 0
@@ -59,32 +60,45 @@
\addto\extraspolutonikogreek{\l@greek=\bbl@polygreek}
\addto\extrasancientgreek{\l@greek=\bbl@ancientgreek}
\providehyphenmins{\CurrentOption}{\@ne\@ne}
-\bbl@declare@ttribute{greek}{polutoniko}{%
+\def\bbl@greek@setup@polytonic{%
\expandafter\addto\expandafter\extrasgreek
- \expandafter{\extraspolutonikogreek}%
+ \expandafter{\extraspolutonikogreek}%
\let\captionsgreek\captionspolutonikogreek
\let\gr@month\gr@polutoniko@month
+ \def\bbl@tempa{LGR}
+ \ifx\greekfontencoding\bbl@tempa
+ \declare@shorthand{greek}{~}{\bbl@greek@tilde}
+ \fi
+}
+\bbl@declare@ttribute{greek}{polutoniko}{%
+ \bbl@greek@setup@polytonic
\let\l@polutonikogreek\l@greek
\let\datepolutonikogreek\dategreek
\let\extraspolutonikogreek\extrasgreek
\let\noextraspolutonikogreek\noextrasgreek
}
\bbl@declare@ttribute{greek}{polytonic}{%
- \expandafter\addto\expandafter\extrasgreek
- \expandafter{\extraspolutonikogreek}%
- \let\captionsgreek\captionspolutonikogreek
- \let\gr@month\gr@polutoniko@month
+ \bbl@greek@setup@polytonic
}
\bbl@declare@ttribute{greek}{ancient}{%
- \expandafter\addto\expandafter\extrasgreek
- \expandafter{\extraspolutonikogreek}% multi-accented letters
+ \bbl@greek@setup@polytonic
\expandafter\addto\expandafter\extrasgreek
\expandafter{\extrasancientgreek}%
\let\captionsgreek\captionsancientgreek
- \let\gr@month\gr@polutoniko@month % (modern) polytonic month names
\renewcommand{\greeknumeralninety}{\textqoppa}%
\renewcommand{\greeknumeralNinety}{\textQoppa}%
}
+\bbl@declare@ttribute{greek}{keep-semicolon}{%
+ \def\bbl@tempa{LGR}
+ \ifx\greekfontencoding\bbl@tempa
+ \ProvideTextCommandDefault{\textsemicolon}{;}
+ \ProvideTextCommand{\textsemicolon}{LGR}{\texterotimatiko}
+ \initiate@active@char{;}
+ \addto\extrasgreek{\bbl@activate{;}}
+ \addto\noextrasgreek{\bbl@deactivate{;}}
+ \declare@shorthand{greek}{;}{\TextOrMath{\textsemicolon}{;}}
+ \fi
+}
\ifdefined\UnicodeEncodingName % set by XeTeX/LuaTeX
\providecommand*{\greekfontencoding}{\UnicodeEncodingName}
\providecommand*{\bbl@greek@fontencdef}{tuenc-greek}
@@ -574,14 +588,7 @@
\DeclareTextCompositeCommand{\"}{TU}{^^9f}{\accdialytika}
\fi
}% end of the \IfFormatAtLeastTF else block
- \begingroup
- \@ifundefined{active@char\string!}{}{\catcode`!=12\relax}
- \catcode`\~=12%
- \lccode`\!=`\~%
- \lowercase{\def\x{\endgroup
- \def\greek@tilde{!}}\x}
- \addto\extraspolutonikogreek{\languageshorthands{greek}}
- \declare@shorthand{greek}{~}{\greek@tilde}
+ \DeclareTextSymbol{\bbl@greek@tilde}{LGR}{126}
\fi % End of LGR-specific code.
\providecommand*{\anwtonos}{\textdexiakeraia}
\providecommand*{\katwtonos}{\textaristerikeraia}