summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2022-03-13 20:47:22 +0000
committerKarl Berry <karl@freefriends.org>2022-03-13 20:47:22 +0000
commit7ebb986f1a3165de070c8b7559221aaba57a702e (patch)
treed7d372bcf66c54c329419de3565acb9367ba21ba
parentc3546bd2d946b41075498bb11ca8a7201616a594 (diff)
babel-polish (13mar22) (branch)
git-svn-id: svn://tug.org/texlive/branches/branch2021.final@62681 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/texmf-dist/doc/generic/babel-polish/README.md9
-rw-r--r--Master/texmf-dist/doc/generic/babel-polish/polish.pdfbin134292 -> 398527 bytes
-rw-r--r--Master/texmf-dist/source/generic/babel-polish/polish.dtx465
-rw-r--r--Master/texmf-dist/source/generic/babel-polish/polish.ins39
-rw-r--r--Master/texmf-dist/tex/generic/babel-polish/polish-compat.ldf220
-rw-r--r--Master/texmf-dist/tex/generic/babel-polish/polish.ldf261
6 files changed, 722 insertions, 272 deletions
diff --git a/Master/texmf-dist/doc/generic/babel-polish/README.md b/Master/texmf-dist/doc/generic/babel-polish/README.md
new file mode 100644
index 00000000000..26f525fcf6f
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/babel-polish/README.md
@@ -0,0 +1,9 @@
+# Babel support for Polish #
+
+This is a language module for the Babel system that supports
+typesetting in Polish.
+
+Released under the LaTeX Project Public License v1.3 or later.
+See <http://www.latex-project.org/lppl.txt>
+
+The Current Maintainer is Marcin Woliński <mailto:wolinski@gust.org.pl>.
diff --git a/Master/texmf-dist/doc/generic/babel-polish/polish.pdf b/Master/texmf-dist/doc/generic/babel-polish/polish.pdf
index 19b5c0b01bb..a4e4db2a3b4 100644
--- a/Master/texmf-dist/doc/generic/babel-polish/polish.pdf
+++ b/Master/texmf-dist/doc/generic/babel-polish/polish.pdf
Binary files differ
diff --git a/Master/texmf-dist/source/generic/babel-polish/polish.dtx b/Master/texmf-dist/source/generic/babel-polish/polish.dtx
index a2e66978558..8109869b988 100644
--- a/Master/texmf-dist/source/generic/babel-polish/polish.dtx
+++ b/Master/texmf-dist/source/generic/babel-polish/polish.dtx
@@ -1,10 +1,11 @@
% \iffalse meta-comment
%
-% Copyright 1989-2005 Johannes L. Braams and any individual authors
+% Copyright © 1989–2005 Johannes L. Braams and any individual authors
% listed elsewhere in this file. All rights reserved.
+% Copyright © 2022 by Marcin Woliński
%
-% This file is part of the Babel system.
-% --------------------------------------
+% This file is intended to be used with the Babel system.
+% ------------------------------------------------------
%
% It may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.3
@@ -16,17 +17,13 @@
%
% This work has the LPPL maintenance status "maintained".
%
-% The Current Maintainer of this work is Johannes Braams.
-%
-% The list of all files belonging to the Babel system is
-% given in the file `manifest.bbl. See also `legal.bbl' for additional
-% information.
+% The Current Maintainer of this work is Marcin Woliński.
%
% The list of derived (unpacked) files belonging to the distribution
% and covered by LPPL is defined by the unpacking scripts (with
% extension .ins) which are part of the distribution.
% \fi
-% \CheckSum{543}
+% \CheckSum{700}
%
% \iffalse
% Tell the \LaTeX\ system who we are and write an entry on the
@@ -34,39 +31,20 @@
%<*dtx>
\ProvidesFile{polish.dtx}
%</dtx>
-%<code>\ProvidesLanguage{polish}
+%<code|compat>\ProvidesLanguage{polish}
%\fi
%\ProvidesFile{polish.dtx}
- [2005/03/31 v1.2l Polish support from the babel system]
+ [2022/03/12 1.3 Babel support for Polish]
%\iffalse
-%% File `polish.dtx'
-%% Babel package for LaTeX version 2e
-%% Copyright (C) 1989 -- 2005
-%% by Johannes Braams, TeXniek
-%
-%% Polish Language Definition File
-%% Copyright (C) 1989 - 2005
-%% by Elmar Schalueck, Michael Janich
-% Universitaet-Gesamthochschule Paderborn
-% Warburger Strasse 100
-% 4790 Paderborn
-% Germany
-% elmar at uni-paderborn.de
-% massa at uni-paderborn.de
-%
-%% Please report errors to: J.L. Braams
-%% babel at braams.cistron.nl
-%
-% This file is part of the babel system, it provides the source
-% code for the Polish language definition file. It was developped
-% out of Polish.tex, which was written by Elmar Schalueck and
-% Michael Janich. Polish.tex was based on code by Leszek
-% Holenderski, Jerzy Ryll and J. S. Bie\'n from Faculty of
-% Mathematics,Informatics and Mechanics of Warsaw University, exept
-% of Jerzy Ryll (Instytut Informatyki Uniwersytetu Warszawskiego).
%<*filedriver>
\documentclass{ltxdoc}
-\newcommand*\TeXhax{\TeX hax}
+\usepackage{lmodern}
+\usepackage[QX]{fontenc}
+\usepackage{array,ot1patch}
+\usepackage[hidelinks]{hyperref}
+\title{Babel support for Polish}
+\author{\normalsize current maintainer: Marcin Woliński}
+\date{Version \fileversion, \filedate}
\newcommand*\babel{\textsf{babel}}
\newcommand*\langvar{$\langle \it lang \rangle$}
\newcommand*\note[1]{}
@@ -78,6 +56,7 @@
%</filedriver>
%\fi
% \GetFileInfo{polish.dtx}
+% \maketitle
%
% \changes{polish-1.1c}{1994/06/26}{Removed the use of \cs{filedate}
% and moved identification after the loading of babel.def}
@@ -86,57 +65,399 @@
% with \LaTeX, moved the definition of \cs{atcatcode} right to the
% beginning.}
%
-% \section{The Polish language}
-%
-% The file \file{\filename}\footnote{The file described in this
-% section has version number \fileversion\ and was last revised on
-% \filedate.} defines all the language-specific macros for the
-% Polish language.
-%
-% For this language the character |"| is made active. In
-% table~\ref{tab:polish-quote} an overview is given of its purpose.
+% \section{Basic Usage}
+%
+% Typesetting Polish with \TeX\ is, surprisingly, more difficult
+% than setting most other European languages. Polish uses several
+% accented characters. Some of them, including \textit{ć, ń, ó, ś,
+% ź, ż, Ć, Ń, Ó, Ś, Ź, Ż}, can be reasonably rendered by attaching
+% “floating diacritics” to Latin letters. More problematic is the
+% letter \textit{ł/Ł}, but legend has it that Donald Knuth needed
+% to include the name \textit{Łukasiewicz} in his TAOCP, so he
+% included a “diacritic” stroke in his Computer Modern fonts.
+% Unfortunately, he had no reason to mention \textit{Wałęsa}
+% anywhere in TAOCP, and in result the
+% “ogonek\footnote{The Polish name seems to also be the official
+% English name of the diacritic:\\
+% \url{https://en.wikipedia.org/wiki/Ogonek}.} accent” is not
+% present in original \TeX\ fonts. A different set of fonts is
+% necessary to properly render Polish characters with ogonek:
+% \emph{ą, ę, Ą, Ę} (these characters are also used in Lithuanian
+% along with \textit{į, ų, Į, Ų}).
+%
+% In Unicode \TeX\ engines (Xe\LaTeX, lua\LaTeX), Latin Modern
+% fonts are used by default and these include a rich repertoire of
+% accented Latin characters. With these engines, it’s enough to
+% load Babel with the Polish module:
+% \begin{verbatim}
+% \usepackage[polish]{babel}
+% \end{verbatim}
+%
+% The matter is more complicated in the case of classical \LaTeX\
+% (including pdf\LaTeX). To obtain correct Polish letters, it is
+% necessary to switch the document to a suitable font encoding.
+% One possibility is:
+% \begin{verbatim}
+% \usepackage[OT4]{fontenc}
+% \usepackage[polish]{babel}
+% \end{verbatim}
+% This will result in a document typeset using the Polish
+% adaptation of Knuth’s classical Computer Modern fonts.
+%
+% A more flexible option is the European font encoding T1, which
+% covers most of European languages written in the Latin script.
+% Unfortunately, the default fonts in this encoding are bitmap
+% based, which will result in sub-optimal rendering. So with T1 it
+% is necessary to select a different font family as well. A safe
+% option is to use Latin Modern (Latin Modern is practically
+% identical to Computer Modern, a new name was needed to keep
+% backward compatibility of Computer Modern):
+% \begin{verbatim}
+% \usepackage{lmodern}
+% \usepackage[T1]{fontenc}
+% \usepackage[polish]{babel}
+% \end{verbatim}
+% Many font switching packages work with T1. Besides Latin Modern,
+% you can expect well designed Polish characters to be present in
+% all fonts from the \TeX\ Gyre collection (in particular the Times
+% lookalike \file{tgtermes}, Bookmanish \file{tgbonum}, Century
+% Schoolbook-like \file{tgschola}, etc.) and in other fonts
+% originating from the Polish \TeX\ Users Group
+% GUST\footnote{\url{http://www.gust.org.pl/projects/e-foundry}}.
+% With Unicode engines you can also use any OpenType font present
+% on your system (see the \texttt{fontspec} package).
+%
+% It is also worth noting, that ogonek is not really an accent: it
+% has to be separately designed for each base letter to get a
+% typographically acceptable result. This is not the case, e.g.,
+% for the packages in the PSNFSS set, in particular
+% \file{times.sty}. Although these support the T1 encoding, the
+% ogonek protrudes from the characters at some random angle (this
+% is particularly visible in the case of the letter~ę):
+% \begin{center}\fontencoding{T1}
+% \begin{tabular}{l>\Huge l<{gąbkę}>{\Huge\itshape\strut} l<{gąbkę}}
+% \TeX\ Gyre Termes & \fontfamily{qtm}\selectfont &
+% \fontfamily{qtm}\selectfont \\
+% PSNFF Times & \fontfamily{ptm}\selectfont &
+% \fontfamily{ptm}\selectfont \\
+% \end{tabular}
+% \end{center}
+% If quality is your goal, do not use \file{times.sty} for Polish,
+% use \file{tgtermes.sty}.
+%
+% Another element necessary for successful typesetting of Polish is
+% a way to encode Polish accented characters in the source file.
+% Fortunately, nowadays all \LaTeX\ engines assume input files to
+% be in Unicode, in its UTF-8 form, so if you are on a modern
+% system, this will work by default. (If you are forced to use
+% some old byte-based encoding like the standard ISO 8859-2 or its
+% Windows counterpart CP1250, please consult the documentation of
+% the \file{inputenc} package.)
+%
+%
+%\section{The Functions of this Module}
+%
+% As of version 1.3 the code has been updated to the new syntax
+% provided by Babel to declare language specific elements. In its
+% current form, the module is pretty typical \texttt{.ldf} file: it
+% defines Polish translation of language specific strings used by
+% \LaTeX, it ensures Polish hyphenation patterns are used, and
+% activates the setting known as \cs{frenchspacing}.
+%
+% Language modules of Babel typically check for the hyphenation
+% patterns for the language in question. In their absence, a
+% warning is issued and English hyphenation patterns are activated.
+% We find this behaviour inappropriate. Polish hyphenation
+% patterns are a part of standard \TeX\ distributions for over 20
+% years. Inability to load them signals some configuration problem
+% in the system. Moreover, the use of English patterns would lead
+% to very badly chosen breaks in a Polish text. Thus, we have
+% decided to block automatic hyphenation in Polish text in this
+% case. In consequence, system configuration has to be corrected or
+% hyphenation points selected manually.
+%
+% American typography has a rule, that space after punctuation
+% characters is larger than typical inter-word space. This rule is
+% by default followed by \TeX. In Polish tradition all spaces
+% should be of equal width, so we activate \cs{frenchspacing} for
+% Polish text.
+%
+% Babel provides a mechanism for language-specific short commands
+% (shorthands) consisting of the character \texttt{"} followed by
+% one more character. Table~\ref{tab:polish-short} lists the
+% commands available for Polish. The shorthand \texttt{"-} is
+% similar to the command \cs{-} but the former does not block
+% automatic hyphenation in the rest of the word. The shorthand
+% \texttt{"=} should be used for explicit hyphens in the text.
+% According to Polish rules, when a break occurs at an explicit
+% hyphen, the hyphen gets repeated at the beginning of the new
+% line. So, e.g., Polish compound adjectives like
+% \emph{biało-czerwony} `white-and-red' should be input as
+% \texttt{biało"=czerwony}.
+% \begin{table}[ht]
+% \caption{Shorthands provided by the Polish module}
+% \label{tab:polish-short}
+% \begin{center}
+% \begin{tabular}{lp{10cm}}
+% |"-| & soft hyphen\\
+% |"=| & explicit hyphen repeated after the break \\
+% \verb="|= & disable ligature at this position.\\
+% |"`| & Polish left double quote: „ \\
+% |"'| & Polish right double quote: ” \\
+% |"<| & French left double quote: « (used in Polish as
+% second level quotes)\\
+% |">| & French right double quote: »\\
+% \end{tabular}
+% \end{center}
+% \end{table}
+%
+%
+% \section{A Note on Compatibility}
+% \label{sec:compat}
+%
+% Incompatible changes were introduced in version 1.3 of this module.
+% In case of problems with processing legacy documents, please
+% try replacing the module invocation with the following:
+% \begin{verbatim}
+% \usepackage[polish-compat]{babel}
+% \end{verbatim}
+% This causes an exact copy of the module version v1.2l of
+% 2005/03/31 to be loaded. However, please be aware that this old
+% code has known problems (see Section~\ref{sec:compat-code}). In
+% compatibility mode a different list of shorthands is available,
+% they are listed in Table~\ref{tab:polish-quote}.
% \begin{table}[htb]
-% \begin{center}
-% \begin{tabular}{lp{8cm}}
-% |"a| & or |\aob|, for tailed-a (like \c{a})\\
-% |"A| & or |\Aob|, for tailed-A (like \c{A})\\
-% |"e| & or |\eob|, for tailed-e (like \c{e})\\
-% |"E| & or |\Eob|, for tailed-E (like \c{E})\\
-% |"c| & or |\'c|, for accented c (like \'c),
-% same with uppercase letters and n,o,s\\
-% |"l| & or |\lpb{}|, for l with stroke (like \l)\\
-% |"L| & or |\Lpb{}|, for L with stroke (like \L)\\
-% |"r| & or |\zkb{}|, for pointed z (like \.z), cf.
+% \caption{Shortcuts and commands provided in the compatibility
+% mode. Be aware that these do not provide typographically
+% acceptable shapes of Polish accented characters.}
+% \label{tab:polish-quote}
+% \begin{center}\fontencoding{OT1}\selectfont
+% \begin{tabular}{lp{10cm}}
+% |"a| & or |\aob|, for a-ogonek (rendered ą)\\
+% |"A| & or |\Aob|, for A-ogonek (rendered \k{A})\\
+% |"e| & or |\eob|, for e-ogonek (rendered \k{e})\\
+% |"E| & or |\Eob|, for E-ogonek (rendered \k{E})\\
+% |"c| & or |\'c|, for accented c (\'c),
+% same with uppercase letters and n, o, s\\
+% |"l| & or |\lpb{}|, for l with stroke (\l)\\
+% |"L| & or |\Lpb{}|, for L with stroke (\L)\\
+% |"r| & or |\zkb{}|, for z-dot-accent (\.z), cf.
% pronounciation\\
-% |"R| & or |\Zkb{}|, for pointed Z (like \.Z)\\
-% |"z| & or |\'z|, for accented z\\
-% |"Z| & or |\'Z|, for accented Z\\
+% |"R| & or |\Zkb{}|, for Z-dot-accent (\.Z)\\
+% |"z| & or |\'z|, for accented z (ź)\\
+% |"Z| & or |\'Z|, for accented Z (Ź)\\
% \verb="|= & disable ligature at this position.\\
% |"-| & an explicit hyphen sign, allowing hyphenation
% in the rest of the word.\\
% |""| & like |"-|, but producing no hyphen sign
% (for compund words with hyphen, e.g.\ |x-""y|). \\
-% |"`| & for German left double quotes (looks like ,,). \\
-% |"'| & for German right double quotes. \\
-% |"<| & for French left double quotes (similar to $<<$). \\
-% |">| & for French right double quotes (similar to $>>$).\\
+% |"`| & for Polish left double quote (,,). \\
+% |"'| & for Polish right double quote (''). \\
+% |"<| & for French left double quote (\guillemotleft). \\
+% |">| & for French right double quote (\guillemotright).\\
% \end{tabular}
-% \caption{The extra definitions made by \file{polish.sty}}
-% \label{tab:polish-quote}
% \end{center}
% \end{table}
%
-% \StopEventually{}
+% \StopEventually{}\newpage
+%
+% \section{The code}
+% \begin{macrocode}
+%<*code>
+\LdfInit{polish}\captionspolish
+% \end{macrocode}
+%
+% The new code requires at least the version 3.63 of Babel where
+% the macro \cs{babel@texpdf} was first introduced.
+% \begin{macrocode}
+\@ifpackagelater{babel}{2021/08/30}{%
+}{\PackageError{polish.ldf}{Babel too old, at least version 2021/08/30
+ required}{}%
+ \providecommand\babel@texpdf[4]{#1}%
+}
+% \end{macrocode}
+%
+% When this file is read as an option, i.e. by the |\usepackage|
+% command, \texttt{polish} could be an `unknown' language in which
+% case we have to make it known. So we check for the existence of
+% |\l@polish| to see whether we have to do something here.
+%
+% \begin{macrocode}
+\ifx\l@polish\@undefined
+ \@nopatterns{Polish}
+ \adddialect\l@polish\l@unhyphenated\fi
+% \end{macrocode}
+%
+% \begin{macro}{\captionspolish}
+% The macro |\captionspolish| defines all strings used in the four
+% standard documentclasses provided with \LaTeX.
+% \begin{macrocode}
+\StartBabelCommands*{polish}{captions}
+ [unicode, charset=utf8, fontenc=TU EU1 EU2]
+ \SetString{\prefacename}{Przedmowa}
+ \SetString{\refname}{Literatura}
+ \SetString{\abstractname}{Streszczenie}
+ \SetString{\bibname}{Bibliografia}
+ \SetString{\chaptername}{Rozdział}
+ \SetString{\appendixname}{Dodatek}
+ \SetString{\contentsname}{Spis treści}
+ \SetString{\listfigurename}{Spis rysunków}
+ \SetString{\listtablename}{Spis tabel}
+ \SetString{\indexname}{Skorowidz}
+ \SetString{\figurename}{Rysunek}
+ \SetString{\tablename}{Tabela}
+ \SetString{\partname}{Część}
+ \SetString{\enclname}{Załączniki}
+ \SetString{\ccname}{Do wiadomości}
+ \SetString{\headtoname}{Do}
+ \SetString{\pagename}{Strona}
+ \SetString{\seename}{zob.}
+ \SetString{\alsoname}{zob. także}
+ \SetString{\proofname}{Dowód}
+ \SetString{\glossaryname}{Słowniczek}
+
+\StartBabelCommands*{polish}{date}
+ [unicode, charset=utf8, fontenc=TU EU1 EU2]
+ \SetStringLoop{month#1name}{%
+ stycznia,lutego,marca,kwietnia,maja,czerwca,%
+ lipca,sierpnia,września,października,listopada,grudnia}
+% \end{macrocode}
+% And now, the generic branch, using the LICR and assuming T1.
+% \begin{macrocode}
+\StartBabelCommands*{polish}{captions}
+ \SetString{\prefacename}{Przedmowa}
+ \SetString{\refname}{Literatura}
+ \SetString{\abstractname}{Streszczenie}
+ \SetString{\bibname}{Bibliografia}
+ \SetString{\chaptername}{Rozdzia\l}
+ \SetString{\appendixname}{Dodatek}
+ \SetString{\contentsname}{Spis tre\'sci}
+ \SetString{\listfigurename}{Spis rysunk\'ow}
+ \SetString{\listtablename}{Spis tabel}
+ \SetString{\indexname}{Skorowidz}
+ \SetString{\figurename}{Rysunek}
+ \SetString{\tablename}{Tabela}
+ \SetString{\partname}{Cz\k{e}\'s\'c}
+ \SetString{\enclname}{Za\l\k{a}czniki}
+ \SetString{\ccname}{Do wiadomo\'sci}
+ \SetString{\headtoname}{Do}
+ \SetString{\pagename}{Strona}
+ \SetString{\seename}{zob.}
+ \SetString{\alsoname}{zob. tak\.ze}
+ \SetString{\proofname}{Dow\'od}
+ \SetString{\glossaryname}{S\l owniczek}
+
+\StartBabelCommands*{polish}{date}
+ \SetStringLoop{month#1name}{%
+ stycznia,lutego,marca,kwietnia,maja,czerwca,%
+ lipca,sierpnia,wrze\'snia,pa\'zdziernika,listopada,grudnia}
+ \SetString\today{%
+ {\number\day}~\@nameuse{month\romannumeral\month name} {\number\year}}
+\EndBabelCommands
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\extraspolish}
+% \begin{macro}{\noextraspolish}
+% The macro |\extraspolish| will perform all the extra definitions
+% needed for the Polish language. The macro |\noextraspolish| is
+% used to cancel the actions of |\extraspolish|.
+%
+% \begin{macrocode}
+\initiate@active@char{"}
+\declare@shorthand{polish}{"-}{\bbl@hy@soft}
+\declare@shorthand{polish}{"=}{\babel@texpdf{\bbl@hy@repeat}{-}{-}{\textminus}}
+\declare@shorthand{polish}{"|}{\babel@texpdf{\discretionary{-}{}{\kern.03em}}{}{}{}}
+\declare@shorthand{polish}{"`}{\quotedblbase}
+\declare@shorthand{polish}{"'}{\textquotedblright}
+\declare@shorthand{polish}{"<}{\guillemotleft}
+\declare@shorthand{polish}{">}{\guillemotright}
+% \end{macrocode}
+% We specify that the polish group of shorthands should be used.
+% These characters are `turned on' once, later their definition may
+% vary.
+% \begin{macrocode}
+\addto\extraspolish{%
+ \bbl@frenchspacing
+ \languageshorthands{polish}%
+ \bbl@activate{"}}
+% \end{macrocode}
+%
+% For Polish texts |\frenchspacing| should be in effect. We
+% make sure this is the case and reset it if necessary.
+%
+% \begin{macrocode}
+\addto\noextraspolish{%
+ \bbl@nonfrenchspacing
+ \bbl@deactivate{"}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+%
+% \begin{macrocode}
+\ldf@finish{polish}
+%</code>
+% \end{macrocode}
%
+% \subsection{Compatibility code}
+% \label{sec:compat-code}
+%
+% This section contains the code and documentation of version v1.2l
+% (2005/03/31) of \file{polish.ldf}, which is used for
+% \file{polish-compat}. We keep
+% it as a compatibility fallback, since (more or less) this version was
+% available for almost 20 years and some documents may depend on its
+% idiosyncratic features. There are known problems with this code:
+% \begin{itemize}
+% \item The \texttt{"}-shorthands for Polish characters do not use
+% LICR, so even with modern fonts the precomposed characters from
+% the font are not used (in the case of \textit{ą, ę, ł, ż}).
+% \item The substitute for ogonek accent defined for OT1 is not
+% accessible with standard \cs{k} (besides being hideous).
+% \item Wrong shape of \textit{ę} is used in the word
+% \textit{Część} generated by the command \cs{part}.
+% \item The code is \textbf{evil}: it redefines \cs{selectfont},
+% which leads to conflicts with some standard \LaTeX\ packages.
+% Another known incompatibility is the macro \cs{lll}, which
+% conflicts with AMS-\LaTeX.
+% \end{itemize}
+%
% The macro |\LdfInit| takes care of preventing that this file is
% loaded more than once, checking the category code of the
% \texttt{@} sign, etc.
% \changes{polish-1.2d}{1996/11/03}{Now use \cs{LdfInit} to perform
% initial checks}
% \begin{macrocode}
-%<*code>
+%<*compat>
\LdfInit{polish}\captionspolish
% \end{macrocode}
+% \iffalse
+%% File `polish.dtx'
+%% Babel package for LaTeX version 2e
+%% Copyright (C) 1989 -- 2005
+%% by Johannes Braams, TeXniek
+%
+%% Polish Language Definition File
+%% Copyright (C) 1989 - 2005
+%% by Elmar Schalueck, Michael Janich
+% Universitaet-Gesamthochschule Paderborn
+% Warburger Strasse 100
+% 4790 Paderborn
+% Germany
+% elmar at uni-paderborn.de
+% massa at uni-paderborn.de
+%
+%% Please report errors to: J.L. Braams
+%% babel at braams.cistron.nl
+% \fi
+%
+% This file is part of the babel system, it provides the source
+% code for the Polish language definition file. It was developped
+% out of Polish.tex, which was written by Elmar Schalueck and
+% Michael Janich. Polish.tex was based on code by Leszek
+% Holenderski, Jerzy Ryll and J. S. Bie\'n from Faculty of
+% Mathematics,Informatics and Mechanics of Warsaw University, exept
+% of Jerzy Ryll (Instytut Informatyki Uniwersytetu Warszawskiego).
%
% When this file is read as an option, i.e. by the |\usepackage|
% command, \texttt{polish} could be an `unknown' language in which
@@ -539,7 +860,7 @@
% up}
% \begin{macrocode}
\ldf@finish{polish}
-%</code>
+%</compat>
% \end{macrocode}
%
% \Finale
@@ -561,3 +882,9 @@
%% Right brace \} Tilde \~}
%%
\endinput
+
+% \endinput
+% Local Variables:
+% mode: doctex
+% TeX-master: t
+% End:
diff --git a/Master/texmf-dist/source/generic/babel-polish/polish.ins b/Master/texmf-dist/source/generic/babel-polish/polish.ins
index 00a5e50a92b..178ffe1953d 100644
--- a/Master/texmf-dist/source/generic/babel-polish/polish.ins
+++ b/Master/texmf-dist/source/generic/babel-polish/polish.ins
@@ -53,11 +53,11 @@
\declarepreamble\mainpreamble
This is a generated file.
-Copyright 1989-2005 Johannes L. Braams and any individual authors
+Copyright 2022 Marcin Woliński and any individual authors
listed elsewhere in this file. All rights reserved.
-This file was generated from file(s) of the Babel system.
----------------------------------------------------------
+This file is intended to be used with the Babel system.
+------------------------------------------------------
It may be distributed and/or modified under the
conditions of the LaTeX Project Public License, either version 1.3
@@ -69,15 +69,7 @@ version 2003/12/01 or later.
This work has the LPPL maintenance status "maintained".
-The Current Maintainer of this work is Johannes Braams.
-
-This file may only be distributed together with a copy of the Babel
-system. You may however distribute the Babel system without
-such generated files.
-
-The list of all files belonging to the Babel distribution is
-given in the file `manifest.bbl'. See also `legal.bbl for additional
-information.
+The Current Maintainer of this work is Marcin Woliński.
The list of derived (unpacked) files belonging to the distribution
and covered by LPPL is defined by the unpacking scripts (with
@@ -87,11 +79,11 @@ extension .ins) which are part of the distribution.
\declarepreamble\fdpreamble
This is a generated file.
-Copyright 1989-2005 Johannes L. Braams and any individual authors
+Copyright 2022 Marcin Woliński and any individual authors
listed elsewhere in this file. All rights reserved.
-This file was generated from file(s) of the Babel system.
----------------------------------------------------------
+This file is intended to be used with the Babel system.
+------------------------------------------------------
It may be distributed and/or modified under the
conditions of the LaTeX Project Public License, either version 1.3
@@ -103,15 +95,7 @@ version 2003/12/01 or later.
This work has the LPPL maintenance status "maintained".
-The Current Maintainer of this work is Johannes Braams.
-
-This file may only be distributed together with a copy of the Babel
-system. You may however distribute the Babel system without
-such generated files.
-
-The list of all files belonging to the Babel distribution is
-given in the file `manifest.bbl'. See also `legal.bbl for additional
-information.
+The Current Maintainer of this work is Marcin Woliński.
In particular, permission is granted to customize the declarations in
this file to serve the needs of your installation.
@@ -122,12 +106,15 @@ of this file under its original name.
\endpreamble
\keepsilent
+%\askforoverwritefalse
\usedir{tex/generic/babel}
\usepreamble\mainpreamble
-\generate{\file{polish.ldf}{\from{polish.dtx}{code}}
- }
+\generate{
+ \file{polish.ldf}{\from{polish.dtx}{code}}
+ \file{polish-compat.ldf}{\from{polish.dtx}{compat}}
+}
\usepreamble\fdpreamble
\ifToplevel{
diff --git a/Master/texmf-dist/tex/generic/babel-polish/polish-compat.ldf b/Master/texmf-dist/tex/generic/babel-polish/polish-compat.ldf
new file mode 100644
index 00000000000..402af3d7f05
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/babel-polish/polish-compat.ldf
@@ -0,0 +1,220 @@
+%%
+%% This is file `polish-compat.ldf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% polish.dtx (with options: `compat')
+%% This is a generated file.
+%%
+%% Copyright 2022 Marcin Woliński and any individual authors
+%% listed elsewhere in this file. All rights reserved.
+%%
+%% This file is intended to be used with the Babel system.
+%% ------------------------------------------------------
+%%
+%% It may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.3
+%% of this license or (at your option) any later version.
+%% The latest version of this license is in
+%% http://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of LaTeX
+%% version 2003/12/01 or later.
+%%
+%% This work has the LPPL maintenance status "maintained".
+%%
+%% The Current Maintainer of this work is Marcin Woliński.
+%%
+%% The list of derived (unpacked) files belonging to the distribution
+%% and covered by LPPL is defined by the unpacking scripts (with
+%% extension .ins) which are part of the distribution.
+\ProvidesLanguage{polish}
+ [2022/03/12 1.3 Babel support for Polish]
+\LdfInit{polish}\captionspolish
+%% File `polish.dtx'
+%% Babel package for LaTeX version 2e
+%% Copyright (C) 1989 -- 2005
+%% by Johannes Braams, TeXniek
+%% Polish Language Definition File
+%% Copyright (C) 1989 - 2005
+%% by Elmar Schalueck, Michael Janich
+%% Please report errors to: J.L. Braams
+%% babel at braams.cistron.nl
+\ifx\l@polish\@undefined
+ \@nopatterns{Polish}
+ \adddialect\l@polish0\fi
+\addto\captionspolish{%
+ \def\prefacename{Przedmowa}%
+ \def\refname{Literatura}%
+ \def\abstractname{Streszczenie}%
+ \def\bibname{Bibliografia}%
+ \def\chaptername{Rozdzia\l}%
+ \def\appendixname{Dodatek}%
+ \def\contentsname{Spis tre\'sci}%
+ \def\listfigurename{Spis rysunk\'ow}%
+ \def\listtablename{Spis tablic}%
+ \def\indexname{Indeks}%
+ \def\figurename{Rysunek}%
+ \def\tablename{Tablica}%
+ \def\partname{Cz\eob{}\'s\'c}%
+ \def\enclname{Za\l\aob{}cznik}%
+ \def\ccname{Kopie:}%
+ \def\headtoname{Do}%
+ \def\pagename{Strona}%
+ \def\seename{Por\'ownaj}%
+ \def\alsoname{Por\'ownaj tak\.ze}%
+ \def\proofname{Dow\'od}%
+ \def\glossaryname{Glossary}% <-- Needs translation
+}
+\def\datepolish{%
+ \def\today{\number\day~\ifcase\month\or
+ stycznia\or lutego\or marca\or kwietnia\or maja\or czerwca\or lipca\or
+ sierpnia\or wrze\'snia\or pa\'zdziernika\or listopada\or grudnia\fi
+ \space\number\year}%
+}
+\initiate@active@char{"}
+\addto\extraspolish{\languageshorthands{polish}}
+\addto\extraspolish{\bbl@activate{"}}
+\addto\noextraspolish{\bbl@deactivate{"}}
+\newdimen\pl@left
+\newdimen\pl@down
+\newdimen\pl@right
+\newdimen\pl@temp
+\def\sob#1#2#3#4#5{%parameters: letter and fractions hl,ho,vl,vo
+ \setbox0\hbox{#1}\setbox1\hbox{$_\mathchar'454$}\setbox2\hbox{p}%
+ \pl@right=#2\wd0 \advance\pl@right by-#3\wd1
+ \pl@down=#5\ht1 \advance\pl@down by-#4\ht0
+ \pl@left=\pl@right \advance\pl@left by\wd1
+ \pl@temp=-\pl@down \advance\pl@temp by\dp2 \dp1=\pl@temp
+ \leavevmode
+ \kern\pl@right\lower\pl@down\box1\kern-\pl@left #1}
+\DeclareTextCommand{\aob}{OT1}{\sob a{.66}{.20}{0}{.90}}
+\DeclareTextCommand{\Aob}{OT1}{\sob A{.80}{.50}{0}{.90}}
+\DeclareTextCommand{\eob}{OT1}{\sob e{.50}{.35}{0}{.93}}
+\DeclareTextCommand{\Eob}{OT1}{\sob E{.60}{.35}{0}{.90}}
+\DeclareTextCommand{\aob}{T1}{\k a}
+\DeclareTextCommand{\Aob}{T1}{\k A}
+\DeclareTextCommand{\eob}{T1}{\k e}
+\DeclareTextCommand{\Eob}{T1}{\k E}
+\ProvideTextCommandDefault{\aob}{\UseTextSymbol{OT1}{\aob}}
+\ProvideTextCommandDefault{\Aob}{\UseTextSymbol{OT1}{\Aob}}
+\ProvideTextCommandDefault{\eob}{\UseTextSymbol{OT1}{\eob}}
+\ProvideTextCommandDefault{\Eob}{\UseTextSymbol{OT1}{\Eob}}
+\def\spb#1#2#3#4#5{%
+ \setbox0\hbox{#1}\setbox1\hbox{\char'023}%
+ \pl@right=#2\wd0 \advance\pl@right by-#3\wd1
+ \pl@down=#5\ht1 \advance\pl@down by-#4\ht0
+ \pl@left=\pl@right \advance\pl@left by\wd1
+ \ht1=\pl@down \dp1=-\pl@down
+ \leavevmode
+ \kern\pl@right\lower\pl@down\box1\kern-\pl@left #1}
+\def\skb#1#2#3#4#5{%
+ \setbox0\hbox{#1}\setbox1\hbox{\char'056}%
+ \pl@right=#2\wd0 \advance\pl@right by-#3\wd1
+ \pl@down=#5\ht1 \advance\pl@down by-#4\ht0
+ \pl@left=\pl@right \advance\pl@left by\wd1
+ \leavevmode
+ \kern\pl@right\lower\pl@down\box1\kern-\pl@left #1}
+\def\textpl{%
+ \def\lpb{\plll}%
+ \def\Lpb{\pLLL}%
+ \def\zkb{\.z}%
+ \def\Zkb{\.Z}}
+\textpl
+\let\lll=\l \let\LLL=\L
+\def\plll{\lll}
+\def\pLLL{\LLL}
+\def\telepl{%
+ \def\lpb{\spb l{.45}{.5}{.4}{.8}}%
+ \def\Lpb{\spb L{.23}{.5}{.4}{.8}}%
+ \def\zkb{\skb z{.5}{.5}{1.2}{0}}%
+ \def\Zkb{\skb Z{.5}{.5}{1.1}{0}}}
+\ifx\selectfont\@undefined
+ \ifx\prm\@undefined \addto\rm{\textpl}\else \addto\prm{\textpl}\fi
+ \ifx\pit\@undefined \addto\it{\textpl}\else \addto\pit{\textpl}\fi
+ \ifx\pbf\@undefined \addto\bf{\textpl}\else \addto\pbf{\textpl}\fi
+ \ifx\psl\@undefined \addto\sl{\textpl}\else \addto\psl{\textpl}\fi
+ \ifx\psf\@undefined \else \addto\psf{\textpl}\fi
+ \ifx\psc\@undefined \else \addto\psc{\textpl}\fi
+ \ifx\ptt\@undefined \addto\tt{\telepl}\else \addto\ptt{\telepl}\fi
+\else
+ \expandafter\addto\csname selectfont \endcsname{%
+ \csname\f@encoding @pl\endcsname}
+\fi
+\expandafter\let\csname T1@pl\endcsname\textpl
+\expandafter\def\csname OT1@pl\endcsname{%
+ \long\edef\curr@family{\f@family}%
+ \ifx\curr@family\ttdefault
+ \telepl
+ \else
+ \textpl
+ \fi}
+\begingroup \catcode`\"12
+\def\x{\endgroup
+ \def\dq{"}}
+\x
+\declare@shorthand{polish}{"a}{\textormath{\aob}{\ddot a}}
+\declare@shorthand{polish}{"A}{\textormath{\Aob}{\ddot A}}
+\declare@shorthand{polish}{"c}{\textormath{\'c}{\acute c}}
+\declare@shorthand{polish}{"C}{\textormath{\'C}{\acute C}}
+\declare@shorthand{polish}{"e}{\textormath{\eob}{\ddot e}}
+\declare@shorthand{polish}{"E}{\textormath{\Eob}{\ddot E}}
+\declare@shorthand{polish}{"l}{\textormath{\lpb}{\ddot l}}
+\declare@shorthand{polish}{"L}{\textormath{\Lpb}{\ddot L}}
+\declare@shorthand{polish}{"n}{\textormath{\'n}{\acute n}}
+\declare@shorthand{polish}{"N}{\textormath{\'N}{\acute N}}
+\declare@shorthand{polish}{"o}{\textormath{\'o}{\acute o}}
+\declare@shorthand{polish}{"O}{\textormath{\'O}{\acute O}}
+\declare@shorthand{polish}{"s}{\textormath{\'s}{\acute s}}
+\declare@shorthand{polish}{"S}{\textormath{\'S}{\acute S}}
+\newcommand*{\polishrz}{%
+ \declare@shorthand{polish}{"r}{\textormath{\zkb}{\ddot r}}%
+ \declare@shorthand{polish}{"R}{\textormath{\Zkb}{\ddot R}}%
+ \declare@shorthand{polish}{"z}{\textormath{\'z}{\acute z}}%
+ \declare@shorthand{polish}{"Z}{\textormath{\'Z}{\acute Z}}%
+ \declare@shorthand{polish}{"x}{\dq x}%
+ \declare@shorthand{polish}{"X}{\dq X}%
+ }
+\polishrz
+\newcommand*{\polishzx}{%
+ \declare@shorthand{polish}{"z}{\textormath{\zkb}{\ddot z}}%
+ \declare@shorthand{polish}{"Z}{\textormath{\Zkb}{\ddot Z}}%
+ \declare@shorthand{polish}{"x}{\textormath{\'z}{\acute x}}%
+ \declare@shorthand{polish}{"X}{\textormath{\'Z}{\acute X}}%
+ \declare@shorthand{polish}{"r}{\dq r}%
+ \declare@shorthand{polish}{"R}{\dq R}%
+ }
+\declare@shorthand{polish}{"`}{%
+ \textormath{\quotedblbase}{\mbox{\quotedblbase}}}
+\declare@shorthand{polish}{"'}{%
+ \textormath{\textquotedblright}{\mbox{\textquotedblright}}}
+\declare@shorthand{polish}{"<}{%
+ \textormath{\guillemotleft}{\mbox{\guillemotleft}}}
+\declare@shorthand{polish}{">}{%
+ \textormath{\guillemotright}{\mbox{\guillemotright}}}
+\declare@shorthand{polish}{"-}{\nobreak-\bbl@allowhyphens}
+\declare@shorthand{polish}{""}{\hskip\z@skip}
+\declare@shorthand{polish}{"|}{%
+ \textormath{\discretionary{-}{}{\kern.03em}}{}}
+\def\mdqon{\shorthandon{"}}
+\def\mdqoff{\shorthandoff{"}}
+\ldf@finish{polish}
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+%%
+\endinput
+%%
+%% End of file `polish-compat.ldf'.
diff --git a/Master/texmf-dist/tex/generic/babel-polish/polish.ldf b/Master/texmf-dist/tex/generic/babel-polish/polish.ldf
index d05c1384dd4..ae09dbcd4f4 100644
--- a/Master/texmf-dist/tex/generic/babel-polish/polish.ldf
+++ b/Master/texmf-dist/tex/generic/babel-polish/polish.ldf
@@ -7,11 +7,11 @@
%% polish.dtx (with options: `code')
%% This is a generated file.
%%
-%% Copyright 1989-2005 Johannes L. Braams and any individual authors
+%% Copyright 2022 Marcin Woliński and any individual authors
%% listed elsewhere in this file. All rights reserved.
%%
-%% This file was generated from file(s) of the Babel system.
-%% ---------------------------------------------------------
+%% This file is intended to be used with the Babel system.
+%% ------------------------------------------------------
%%
%% It may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3
@@ -23,189 +23,96 @@
%%
%% This work has the LPPL maintenance status "maintained".
%%
-%% The Current Maintainer of this work is Johannes Braams.
-%%
-%% This file may only be distributed together with a copy of the Babel
-%% system. You may however distribute the Babel system without
-%% such generated files.
-%%
-%% The list of all files belonging to the Babel distribution is
-%% given in the file `manifest.bbl'. See also `legal.bbl for additional
-%% information.
+%% The Current Maintainer of this work is Marcin Woliński.
%%
%% The list of derived (unpacked) files belonging to the distribution
%% and covered by LPPL is defined by the unpacking scripts (with
%% extension .ins) which are part of the distribution.
\ProvidesLanguage{polish}
- [2005/03/31 v1.2l Polish support from the babel system]
-%% File `polish.dtx'
-%% Babel package for LaTeX version 2e
-%% Copyright (C) 1989 -- 2005
-%% by Johannes Braams, TeXniek
-%% Polish Language Definition File
-%% Copyright (C) 1989 - 2005
-%% by Elmar Schalueck, Michael Janich
-%% Please report errors to: J.L. Braams
-%% babel at braams.cistron.nl
+ [2022/03/12 1.3 Babel support for Polish]
\LdfInit{polish}\captionspolish
+\@ifpackagelater{babel}{2021/08/30}{%
+}{\PackageError{polish.ldf}{Babel too old, at least version 2021/08/30
+ required}{}%
+ \providecommand\babel@texpdf[4]{#1}%
+}
\ifx\l@polish\@undefined
\@nopatterns{Polish}
- \adddialect\l@polish0\fi
-\addto\captionspolish{%
- \def\prefacename{Przedmowa}%
- \def\refname{Literatura}%
- \def\abstractname{Streszczenie}%
- \def\bibname{Bibliografia}%
- \def\chaptername{Rozdzia\l}%
- \def\appendixname{Dodatek}%
- \def\contentsname{Spis tre\'sci}%
- \def\listfigurename{Spis rysunk\'ow}%
- \def\listtablename{Spis tablic}%
- \def\indexname{Indeks}%
- \def\figurename{Rysunek}%
- \def\tablename{Tablica}%
- \def\partname{Cz\eob{}\'s\'c}%
- \def\enclname{Za\l\aob{}cznik}%
- \def\ccname{Kopie:}%
- \def\headtoname{Do}%
- \def\pagename{Strona}%
- \def\seename{Por\'ownaj}%
- \def\alsoname{Por\'ownaj tak\.ze}%
- \def\proofname{Dow\'od}%
- \def\glossaryname{Glossary}% <-- Needs translation
-}
-\def\datepolish{%
- \def\today{\number\day~\ifcase\month\or
- stycznia\or lutego\or marca\or kwietnia\or maja\or czerwca\or lipca\or
- sierpnia\or wrze\'snia\or pa\'zdziernika\or listopada\or grudnia\fi
- \space\number\year}%
-}
+ \adddialect\l@polish\l@unhyphenated\fi
+\StartBabelCommands*{polish}{captions}
+ [unicode, charset=utf8, fontenc=TU EU1 EU2]
+ \SetString{\prefacename}{Przedmowa}
+ \SetString{\refname}{Literatura}
+ \SetString{\abstractname}{Streszczenie}
+ \SetString{\bibname}{Bibliografia}
+ \SetString{\chaptername}{Rozdział}
+ \SetString{\appendixname}{Dodatek}
+ \SetString{\contentsname}{Spis treści}
+ \SetString{\listfigurename}{Spis rysunków}
+ \SetString{\listtablename}{Spis tabel}
+ \SetString{\indexname}{Skorowidz}
+ \SetString{\figurename}{Rysunek}
+ \SetString{\tablename}{Tabela}
+ \SetString{\partname}{Część}
+ \SetString{\enclname}{Załączniki}
+ \SetString{\ccname}{Do wiadomości}
+ \SetString{\headtoname}{Do}
+ \SetString{\pagename}{Strona}
+ \SetString{\seename}{zob.}
+ \SetString{\alsoname}{zob. także}
+ \SetString{\proofname}{Dowód}
+ \SetString{\glossaryname}{Słowniczek}
+
+\StartBabelCommands*{polish}{date}
+ [unicode, charset=utf8, fontenc=TU EU1 EU2]
+ \SetStringLoop{month#1name}{%
+ stycznia,lutego,marca,kwietnia,maja,czerwca,%
+ lipca,sierpnia,września,października,listopada,grudnia}
+\StartBabelCommands*{polish}{captions}
+ \SetString{\prefacename}{Przedmowa}
+ \SetString{\refname}{Literatura}
+ \SetString{\abstractname}{Streszczenie}
+ \SetString{\bibname}{Bibliografia}
+ \SetString{\chaptername}{Rozdzia\l}
+ \SetString{\appendixname}{Dodatek}
+ \SetString{\contentsname}{Spis tre\'sci}
+ \SetString{\listfigurename}{Spis rysunk\'ow}
+ \SetString{\listtablename}{Spis tabel}
+ \SetString{\indexname}{Skorowidz}
+ \SetString{\figurename}{Rysunek}
+ \SetString{\tablename}{Tabela}
+ \SetString{\partname}{Cz\k{e}\'s\'c}
+ \SetString{\enclname}{Za\l\k{a}czniki}
+ \SetString{\ccname}{Do wiadomo\'sci}
+ \SetString{\headtoname}{Do}
+ \SetString{\pagename}{Strona}
+ \SetString{\seename}{zob.}
+ \SetString{\alsoname}{zob. tak\.ze}
+ \SetString{\proofname}{Dow\'od}
+ \SetString{\glossaryname}{S\l owniczek}
+
+\StartBabelCommands*{polish}{date}
+ \SetStringLoop{month#1name}{%
+ stycznia,lutego,marca,kwietnia,maja,czerwca,%
+ lipca,sierpnia,wrze\'snia,pa\'zdziernika,listopada,grudnia}
+ \SetString\today{%
+ {\number\day}~\@nameuse{month\romannumeral\month name} {\number\year}}
+\EndBabelCommands
\initiate@active@char{"}
-\addto\extraspolish{\languageshorthands{polish}}
-\addto\extraspolish{\bbl@activate{"}}
-\addto\noextraspolish{\bbl@deactivate{"}}
-\newdimen\pl@left
-\newdimen\pl@down
-\newdimen\pl@right
-\newdimen\pl@temp
-\def\sob#1#2#3#4#5{%parameters: letter and fractions hl,ho,vl,vo
- \setbox0\hbox{#1}\setbox1\hbox{$_\mathchar'454$}\setbox2\hbox{p}%
- \pl@right=#2\wd0 \advance\pl@right by-#3\wd1
- \pl@down=#5\ht1 \advance\pl@down by-#4\ht0
- \pl@left=\pl@right \advance\pl@left by\wd1
- \pl@temp=-\pl@down \advance\pl@temp by\dp2 \dp1=\pl@temp
- \leavevmode
- \kern\pl@right\lower\pl@down\box1\kern-\pl@left #1}
-\DeclareTextCommand{\aob}{OT1}{\sob a{.66}{.20}{0}{.90}}
-\DeclareTextCommand{\Aob}{OT1}{\sob A{.80}{.50}{0}{.90}}
-\DeclareTextCommand{\eob}{OT1}{\sob e{.50}{.35}{0}{.93}}
-\DeclareTextCommand{\Eob}{OT1}{\sob E{.60}{.35}{0}{.90}}
-\DeclareTextCommand{\aob}{T1}{\k a}
-\DeclareTextCommand{\Aob}{T1}{\k A}
-\DeclareTextCommand{\eob}{T1}{\k e}
-\DeclareTextCommand{\Eob}{T1}{\k E}
-\ProvideTextCommandDefault{\aob}{\UseTextSymbol{OT1}{\aob}}
-\ProvideTextCommandDefault{\Aob}{\UseTextSymbol{OT1}{\Aob}}
-\ProvideTextCommandDefault{\eob}{\UseTextSymbol{OT1}{\eob}}
-\ProvideTextCommandDefault{\Eob}{\UseTextSymbol{OT1}{\Eob}}
-\def\spb#1#2#3#4#5{%
- \setbox0\hbox{#1}\setbox1\hbox{\char'023}%
- \pl@right=#2\wd0 \advance\pl@right by-#3\wd1
- \pl@down=#5\ht1 \advance\pl@down by-#4\ht0
- \pl@left=\pl@right \advance\pl@left by\wd1
- \ht1=\pl@down \dp1=-\pl@down
- \leavevmode
- \kern\pl@right\lower\pl@down\box1\kern-\pl@left #1}
-\def\skb#1#2#3#4#5{%
- \setbox0\hbox{#1}\setbox1\hbox{\char'056}%
- \pl@right=#2\wd0 \advance\pl@right by-#3\wd1
- \pl@down=#5\ht1 \advance\pl@down by-#4\ht0
- \pl@left=\pl@right \advance\pl@left by\wd1
- \leavevmode
- \kern\pl@right\lower\pl@down\box1\kern-\pl@left #1}
-\def\textpl{%
- \def\lpb{\plll}%
- \def\Lpb{\pLLL}%
- \def\zkb{\.z}%
- \def\Zkb{\.Z}}
-\textpl
-\let\lll=\l \let\LLL=\L
-\def\plll{\lll}
-\def\pLLL{\LLL}
-\def\telepl{%
- \def\lpb{\spb l{.45}{.5}{.4}{.8}}%
- \def\Lpb{\spb L{.23}{.5}{.4}{.8}}%
- \def\zkb{\skb z{.5}{.5}{1.2}{0}}%
- \def\Zkb{\skb Z{.5}{.5}{1.1}{0}}}
-\ifx\selectfont\@undefined
- \ifx\prm\@undefined \addto\rm{\textpl}\else \addto\prm{\textpl}\fi
- \ifx\pit\@undefined \addto\it{\textpl}\else \addto\pit{\textpl}\fi
- \ifx\pbf\@undefined \addto\bf{\textpl}\else \addto\pbf{\textpl}\fi
- \ifx\psl\@undefined \addto\sl{\textpl}\else \addto\psl{\textpl}\fi
- \ifx\psf\@undefined \else \addto\psf{\textpl}\fi
- \ifx\psc\@undefined \else \addto\psc{\textpl}\fi
- \ifx\ptt\@undefined \addto\tt{\telepl}\else \addto\ptt{\telepl}\fi
-\else
- \expandafter\addto\csname selectfont \endcsname{%
- \csname\f@encoding @pl\endcsname}
-\fi
-\expandafter\let\csname T1@pl\endcsname\textpl
-\expandafter\def\csname OT1@pl\endcsname{%
- \long\edef\curr@family{\f@family}%
- \ifx\curr@family\ttdefault
- \telepl
- \else
- \textpl
- \fi}
-\begingroup \catcode`\"12
-\def\x{\endgroup
- \def\dq{"}}
-\x
-\declare@shorthand{polish}{"a}{\textormath{\aob}{\ddot a}}
-\declare@shorthand{polish}{"A}{\textormath{\Aob}{\ddot A}}
-\declare@shorthand{polish}{"c}{\textormath{\'c}{\acute c}}
-\declare@shorthand{polish}{"C}{\textormath{\'C}{\acute C}}
-\declare@shorthand{polish}{"e}{\textormath{\eob}{\ddot e}}
-\declare@shorthand{polish}{"E}{\textormath{\Eob}{\ddot E}}
-\declare@shorthand{polish}{"l}{\textormath{\lpb}{\ddot l}}
-\declare@shorthand{polish}{"L}{\textormath{\Lpb}{\ddot L}}
-\declare@shorthand{polish}{"n}{\textormath{\'n}{\acute n}}
-\declare@shorthand{polish}{"N}{\textormath{\'N}{\acute N}}
-\declare@shorthand{polish}{"o}{\textormath{\'o}{\acute o}}
-\declare@shorthand{polish}{"O}{\textormath{\'O}{\acute O}}
-\declare@shorthand{polish}{"s}{\textormath{\'s}{\acute s}}
-\declare@shorthand{polish}{"S}{\textormath{\'S}{\acute S}}
-\newcommand*{\polishrz}{%
- \declare@shorthand{polish}{"r}{\textormath{\zkb}{\ddot r}}%
- \declare@shorthand{polish}{"R}{\textormath{\Zkb}{\ddot R}}%
- \declare@shorthand{polish}{"z}{\textormath{\'z}{\acute z}}%
- \declare@shorthand{polish}{"Z}{\textormath{\'Z}{\acute Z}}%
- \declare@shorthand{polish}{"x}{\dq x}%
- \declare@shorthand{polish}{"X}{\dq X}%
- }
-\polishrz
-\newcommand*{\polishzx}{%
- \declare@shorthand{polish}{"z}{\textormath{\zkb}{\ddot z}}%
- \declare@shorthand{polish}{"Z}{\textormath{\Zkb}{\ddot Z}}%
- \declare@shorthand{polish}{"x}{\textormath{\'z}{\acute x}}%
- \declare@shorthand{polish}{"X}{\textormath{\'Z}{\acute X}}%
- \declare@shorthand{polish}{"r}{\dq r}%
- \declare@shorthand{polish}{"R}{\dq R}%
- }
-\declare@shorthand{polish}{"`}{%
- \textormath{\quotedblbase}{\mbox{\quotedblbase}}}
-\declare@shorthand{polish}{"'}{%
- \textormath{\textquotedblright}{\mbox{\textquotedblright}}}
-\declare@shorthand{polish}{"<}{%
- \textormath{\guillemotleft}{\mbox{\guillemotleft}}}
-\declare@shorthand{polish}{">}{%
- \textormath{\guillemotright}{\mbox{\guillemotright}}}
-\declare@shorthand{polish}{"-}{\nobreak-\bbl@allowhyphens}
-\declare@shorthand{polish}{""}{\hskip\z@skip}
-\declare@shorthand{polish}{"|}{%
- \textormath{\discretionary{-}{}{\kern.03em}}{}}
-\def\mdqon{\shorthandon{"}}
-\def\mdqoff{\shorthandoff{"}}
+\declare@shorthand{polish}{"-}{\bbl@hy@soft}
+\declare@shorthand{polish}{"=}{\babel@texpdf{\bbl@hy@repeat}{-}{-}{\textminus}}
+\declare@shorthand{polish}{"|}{\babel@texpdf{\discretionary{-}{}{\kern.03em}}{}{}{}}
+\declare@shorthand{polish}{"`}{\quotedblbase}
+\declare@shorthand{polish}{"'}{\textquotedblright}
+\declare@shorthand{polish}{"<}{\guillemotleft}
+\declare@shorthand{polish}{">}{\guillemotright}
+\addto\extraspolish{%
+ \bbl@frenchspacing
+ \languageshorthands{polish}%
+ \bbl@activate{"}}
+\addto\noextraspolish{%
+ \bbl@nonfrenchspacing
+ \bbl@deactivate{"}}
\ldf@finish{polish}
%% \CharacterTable
%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z