From 96279e10351cd9b20f2e68d4ec156363e3754d1f Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 29 Aug 2022 20:04:55 +0000 Subject: xgreek (29aug22) git-svn-id: svn://tug.org/texlive/trunk@64233 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty | 51 ++++++++++++++++++++++--- 1 file changed, 45 insertions(+), 6 deletions(-) (limited to 'Master/texmf-dist/tex/xelatex') diff --git a/Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty b/Master/texmf-dist/tex/xelatex/xgreek/xgreek.sty index c4b0d39c5b3..5b4a0b471a1 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—2018 Apostolos Syropoulos +%% (c) Copyright 2007—2022 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} - [2018/02/16 v3.0.1 Package `xgreek.sty'] -\message{Package `xgreek' version 3.0.1 by Apostolos Syropoulos} + [2022/08/28 v3.1.0 Package `xgreek.sty'] +\message{Package 'xgreek' version 3.1.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 @@ -458,8 +458,44 @@ \DeclareOption{nonumeralsign}{% \let\numer@lsign\relax } +\newif\if@mylistings +\@mylistingsfalse +\DeclareOption{listings}{% + \@mylistingstrue +} \ExecuteOptions{monogreek} \ProcessOptions +\if@mylistings +\RequirePackage{listings} +\lstset{inputencoding=utf8} +\lst@InputCatcodes +\gdef\lst@DefEC{% + \lst@CCECUse \lst@ProcessLetter + ^^80^^81^^82^^83^^84^^85^^86^^87^^88^^89^^8a^^8b^^8c^^8d^^8e^^8f% + ^^90^^91^^92^^93^^94^^95^^96^^97^^98^^99^^9a^^9b^^9c^^9d^^9e^^9f% + ^^a0^^a1^^a2^^a3^^a4^^a5^^a6^^a7^^a8^^a9^^aa^^ab^^ac^^ad^^ae^^af% + ^^b0^^b1^^b2^^b3^^b4^^b5^^b6^^b7^^b8^^b9^^ba^^bb^^bc^^bd^^be^^bf% + ^^c0^^c1^^c2^^c3^^c4^^c5^^c6^^c7^^c8^^c9^^ca^^cb^^cc^^cd^^ce^^cf% + ^^d0^^d1^^d2^^d3^^d4^^d5^^d6^^d7^^d8^^d9^^da^^db^^dc^^dd^^de^^df% + ^^e0^^e1^^e2^^e3^^e4^^e5^^e6^^e7^^e8^^e9^^ea^^eb^^ec^^ed^^ee^^ef% + ^^f0^^f1^^f2^^f3^^f4^^f5^^f6^^f7^^f8^^f9^^fa^^fb^^fc^^fd^^fe^^ff% + ^^^^0396^^^^0388^^^^0389^^^^038a^^^^038c% <--- Begin of Greek Letters + ^^^^038e^^^^038f^^^^0390^^^^0391^^^^0392% + ^^^^0393^^^^0394^^^^0395^^^^0396^^^^0397% + ^^^^0398^^^^0399^^^^039a^^^^039b^^^^039c% + ^^^^039d^^^^039e^^^^039f^^^^03a0^^^^03a1% + ^^^^03a3^^^^03a4^^^^03a5^^^^03a6^^^^03a7% + ^^^^03a8^^^^03a9^^^^03aa^^^^03ab^^^^03ac% + ^^^^03ad^^^^03ae^^^^03af^^^^03b0^^^^03b1% + ^^^^03b2^^^^03b3^^^^03b4^^^^03b5^^^^03b6% + ^^^^03b7^^^^03b8^^^^03b9^^^^03ba^^^^03bb% + ^^^^03bc^^^^03bd^^^^03be^^^^03bf^^^^03c0% + ^^^^03c1^^^^03c2^^^^03c3^^^^03c4^^^^03c5% + ^^^^03c6^^^^03c7^^^^03c8^^^^03c9^^^^03ca% + ^^^^03cb^^^^03cc^^^^03cd^^^^03ce% <--- End of Greek Letters + ^^00}% +\lst@RestoreCatcodes +\fi \def\gr@ill@value#1{% \PackageWarning{xgreek}{Illegal value (#1) for greeknumeral}} \DeclareRobustCommand\anw@false{% @@ -530,11 +566,13 @@ \ifnum\@attic@num<\@ne% \space% \PackageWarning{xgreek}{% - Illegal value (\the\@attic@num) for acrophonic Attic numeral}% + Illegal value (\the\@attic@num) for acrophonic + Attic numeral}% \else\ifnum\@attic@num>249999% \space% \PackageWarning{xgreek}{% - Value too large (\the\@attic@num) for acrophonic Attic numeral}% + Value too large (\the\@attic@num) for acrophonic + Attic numeral}% \else \@whilenum\@attic@num>49999\do{% ^^^^^^010147\advance\@attic@num-50000}% @@ -579,7 +617,8 @@ \ifx\directlua\undefined% \def\setlanguage#1{% \expandafter\ifx\csname l@#1\endcsname\relax% - \typeout{^^J Error: No hyphenation pattern for language #1 loaded,}% + \typeout{^^J Error: No hyphenation pattern for}% + \typeout{ language #1 are loaded,}% \typeout{ default hyphenation patterns are used.^^J}% \language=0% \else\language=\csname l@#1\endcsname\fi} -- cgit v1.2.3