diff options
author | Karl Berry <karl@freefriends.org> | 2023-06-02 21:23:33 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2023-06-02 21:23:33 +0000 |
commit | 3f4eed1797ce5dd237f3680638a2be5e37db3be0 (patch) | |
tree | 37f2658249e7c50589e1291bd81e3504d496ed0f /Master/texmf-dist/tex/generic/babel-greek | |
parent | 193a4a9f79a21c46d0d3785469b1b1ee9d4184ef (diff) |
babel-greek (2jun23)
git-svn-id: svn://tug.org/texlive/trunk@67268 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/babel-greek')
-rw-r--r-- | Master/texmf-dist/tex/generic/babel-greek/greek.ldf | 33 |
1 files changed, 27 insertions, 6 deletions
diff --git a/Master/texmf-dist/tex/generic/babel-greek/greek.ldf b/Master/texmf-dist/tex/generic/babel-greek/greek.ldf index 86e98ca0814..9fe63802bd5 100644 --- a/Master/texmf-dist/tex/generic/babel-greek/greek.ldf +++ b/Master/texmf-dist/tex/generic/babel-greek/greek.ldf @@ -32,7 +32,7 @@ %% and covered by LPPL is defined by the unpacking script (babel-greek.ins) %% which is part of the package. \ProvidesLanguage{greek} - [2023/03/17 1.13.1 Greek support for the babel system] + [2023-06-01 1.13.2 Greek support for the babel system] %% File `babel-greek.dtx' %% Greek language Definition File %% Copyright © 1997, 2005 Apostolos Syropoulos, Johannes Braams @@ -62,13 +62,9 @@ \providehyphenmins{\CurrentOption}{\@ne\@ne} \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 @@ -99,6 +95,18 @@ \declare@shorthand{greek}{;}{\TextOrMath{\textsemicolon}{;}} \fi } +\def\bbl@greek@modifiers{,polutoniko,polytonic,ancient,keep-semicolon,} +\addto\bbl@greek@modifiers{local-LGR-fixes,no-LGR-fixes,} +\ifx\BabelModifiers\relax\else + \bbl@foreach\BabelModifiers{% + \@expandtwoargs\in@{,#1,}{\bbl@greek@modifiers} + \ifin@\else + \bbl@warning + {Unknown/misspelled modifier '#1' in '\CurrentOption'. + See "babel-greek.pdf" for valid modifiers.} + \fi}% +\fi + \ifdefined\UnicodeEncodingName % set by XeTeX/LuaTeX \providecommand*{\greekfontencoding}{\UnicodeEncodingName} \providecommand*{\bbl@greek@fontencdef}{tuenc-greek} @@ -559,6 +567,16 @@ \lccode219=240% GREEK CAPITAL LETTER IOTA WITH DIALYTIKA \lccode223=244% GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA } + \ifdefined\DeclareUppercaseMapping % new in 2023 + \DeclareUppercaseMapping[el]{"1FBE}{\prosgegrammeni}% + \DeclareUppercaseMapping[el]{"0027}{}% ' + \addto\bbl@greek@setup@polytonic{ + \DeclareUppercaseMapping[el]{"003C}{}% < + \DeclareUppercaseMapping[el]{"003E}{}% > + \DeclareUppercaseMapping[el]{"0060}{}% ` + \DeclareUppercaseMapping[el]{"007E}{}% ~ + } + \fi % fallback for for LaTeX versions older than 2020-10-01 \providecommand\IfFormatAtLeastTF{\@ifl@t@r\fmtversion} \IfFormatAtLeastTF{2022/06/01}% @@ -589,6 +607,9 @@ \fi }% end of the \IfFormatAtLeastTF else block \DeclareTextSymbol{\bbl@greek@tilde}{LGR}{126} + \addto\bbl@greek@setup@polytonic{ + \declare@shorthand{greek}{~}{\bbl@greek@tilde} + } \fi % End of LGR-specific code. \providecommand*{\anwtonos}{\textdexiakeraia} \providecommand*{\katwtonos}{\textaristerikeraia} |