diff options
author | Karl Berry <karl@freefriends.org> | 2022-05-06 21:18:29 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2022-05-06 21:18:29 +0000 |
commit | 3cc18a5231ac4bf1b2c12cfdb5843114daf41a77 (patch) | |
tree | 3d61df81b78f961e8e89cb58b6904c4b2d241ed5 /Master/texmf-dist/tex | |
parent | 478fce747874468b2a36b89320ef36b9fd830913 (diff) |
begingreek (6may22)
git-svn-id: svn://tug.org/texlive/trunk@63240 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex')
-rw-r--r-- | Master/texmf-dist/tex/latex/begingreek/begingreek.sty | 69 |
1 files changed, 38 insertions, 31 deletions
diff --git a/Master/texmf-dist/tex/latex/begingreek/begingreek.sty b/Master/texmf-dist/tex/latex/begingreek/begingreek.sty index b8ec8718616..39df2a73b47 100644 --- a/Master/texmf-dist/tex/latex/begingreek/begingreek.sty +++ b/Master/texmf-dist/tex/latex/begingreek/begingreek.sty @@ -5,31 +5,31 @@ %% The original source files were: %% %% begingreek.dtx (with options: `package') -%% Copyright 2015 Claudio Beccari All rights reserved. +%% Copyright 2015-2022 Claudio Beccari All rights reserved. %% %% This system is distributed in the hope that it will be useful, %% but WITHOUT ANY WARRANTY; without even the implied warranty of %% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. %% -%% This file is distributed under the LPPL licence, version 1.3c -%% dated 2008-05-04 or later as it appears in -%% CTAN/macros/latex/base/lppl.tex. +%% This file beginngreek.sty, derived from the begingreek.dtx file, +%% is distributed under the LPPL licence, version 1.3c dated 2008-05-04 or +%% later as it appears in CTAN/macros/latex/base/lppl.tex. %% %% IMPORTANT NOTICE: %% -%% You are not allowed to change this file. +%% You are allowed to modify this file ONLY if you change its name and the name of the source .dtx file. You cannot distribute a modified version of the source and the derived files under the same original name. According to the LPPL, you must keep the original author name, but you must assume the role of the modified version maintenance. %% %% You are allowed to distribute this file under the condition that it is %% specified in the source file begingreek.dtx. %% %% If you receive only some of these files from someone, complain! %% -%% You are NOT ALLOWED to distribute this file alone. You are NOT +%% You are NOT ALLOWED to distribute this file alone. You are NOT %% ALLOWED to take money for the distribution or use of either this -%% file or a changed version, except for a nominal charge for copying +%% file or a modified version, except for a nominal charge for copying %% etc. -\NeedsTeXFormat{LaTeX2e}[2011/06/27] -\ProvidesPackage{begingreek}[2015/02/16 v.1.5 defines environment greek (CB)] +\NeedsTeXFormat{LaTeX2e}[2018/01/01] +\ProvidesPackage{begingreek}[2022/05/06 v.1.6 Defines environment greek] \usepackage{iftex} \unless\ifPDFTeX @@ -41,44 +41,51 @@ Type X to quit}{\@ehd} \expandafter\endinput \fi \unless\ifcsname captionsgreek\endcsname -\PackageError{begingreek}{\MessageBreak -Package `begingreek' may be used only\MessageBreak -if language `greek' is already defined\MessageBreak -Check that `begingreek' is loaded after\MessageBreak -`babel' and that the language `greek'\MessageBreak -has been specified\MessageBreak\MessageBreak +\PackageError{begingreek}{% +****************************************\MessageBreak +Package `begingreek' may be used only \MessageBreak +if language `greek' is already defined. \MessageBreak +Check that `begingreek' is loaded after \MessageBreak +`babel' and that the language `greek' \MessageBreak +has been specified \MessageBreak +****************************************\MessageBreak Type X to quit}{\@ehd} \expandafter\endinput \fi \def\greekfontfamily{lmr} -\DeclareOption*{\IfFileExists{lgr\CurrentOption.fd}{% -\edef\greekfontfamily{\CurrentOption}}{% -\PackageWarning{begingreek}{% -The file lgr\CurrentOption.fd does not exist\MessageBreak -Either provide such a file, or specify a\MessageBreak -valid Greek font family to the\MessageBreak -\string\begin\string{greek\string} package\MessageBreak -I continue with the default font family\MessageBreak}}} +\DeclareOption*{% + \IfFileExists{lgr\CurrentOption.fd}% + {\edef\greekfontfamily{\CurrentOption}}% + {\PackageWarning{begingreek}{% + The file lgr\CurrentOption.fd does not exist\MessageBreak + Either provide such a file, or specify a \MessageBreak + valid Greek font family to the \MessageBreak + \string\begin\string{greek\string} package \MessageBreak + I continue with the default font family \MessageBreak}% + }% +} \ProcessOptions\relax \newenvironment{greek}[1][\greekfontfamily]{\begin{otherlanguage}{greek}% \edef\Greekfontfamily{#1}% \IfFileExists{lgr\Greekfontfamily.fd}{}% -{\PackageWarning{begingreek}{% -Font family lgr\Greekfontfamily.fd does not exist\MessageBreak -Default fonts used}\def\Greekfontfamily{\greekfontfamily}}% + {\PackageWarning{begingreek}{\MessageBreak + Font family lgr\Greekfontfamily.fd does not exist\MessageBreak + Default fonts used\MessageBreak}% +\def\Greekfontfamily{\greekfontfamily}}% \fontfamily{\Greekfontfamily}\selectfont }{\end{otherlanguage}} \newcommand*\greektxt[2][\greekfontfamily]{% \edef\Greekfontfamily{#1}% -\foreignlanguage{greek}{% \IfFileExists{lgr\Greekfontfamily.fd}{}% -{\PackageWarning{begingreek}{% -Font family lgr\Greekfontfamily.fd does not exist\MessageBreak -Default fonts used}\def\Greekfontfamily{\greekfontfamily}}% -\fontfamily{\Greekfontfamily}\selectfont#2}} + {\PackageWarning{begingreek}{\MessageBreak + Font family lgr\Greekfontfamily.fd does not exist\MessageBreak + Default fonts used\MessageBreak}% +\def\Greekfontfamily{\greekfontfamily}}% +\fontfamily{\Greekfontfamily}\selectfont +\foreignlanguage{greek}{#2}} \endinput |