summaryrefslogtreecommitdiff
path: root/info/lshort/polish/src/lshort2e.sty
diff options
context:
space:
mode:
Diffstat (limited to 'info/lshort/polish/src/lshort2e.sty')
-rw-r--r--info/lshort/polish/src/lshort2e.sty574
1 files changed, 574 insertions, 0 deletions
diff --git a/info/lshort/polish/src/lshort2e.sty b/info/lshort/polish/src/lshort2e.sty
new file mode 100644
index 0000000000..1800c72395
--- /dev/null
+++ b/info/lshort/polish/src/lshort2e.sty
@@ -0,0 +1,574 @@
+%% -- translate-file=il2-pl --
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Contents: Special Commands (LShort2e Introduction)
+% File: lshort2e.sty (Polish translation)
+% By Tobias Oetiker
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Dopasowanie do potrzeb polskiego tłumaczenia: TP
+% Ostatnie modyfikacje: grudzień 2006, TP
+% Komentarze angielskie z reguły pochodzą od TO, polskie od TP
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%\errorcontextlines=10
+%
+%save pageref an label
+% Przed dołączeniem amsmath robimy zaślepkę celem
+% zademostrowania `generycznego` LaTeXa
+\let\ORInfss@text \nfss@text
+\def\RestoreStandardLaTeX{\let\nfss@text \ORInfss@text}
+%
+\let\lsspageref=\pageref
+\ProvidesPackage{lshort2e}
+\RequirePackage{verbatim}
+\RequirePackage{fancyhdr}
+\RequirePackage{calc}
+\RequirePackage{amsmath,latexsym,amsthm}
+\RequirePackage[psamsfonts]{amssymb}
+
+%\RequirePackage{textcomp}
+%\RequirePackage{type1cm}% remove size restrictions
+%\RequirePackage{aeguill}
+% some packages which draw a euro
+\RequirePackage{textcomp}
+% need some magic here to keep the original definition of rightarrow
+\newcommand{\org@Rightarrow}{}
+\let\org@Rightarrow\Rightarrow
+\usepackage{marvosym}
+\let\MVRightarrow\Rightarrow
+\let\Rightarrow\org@Rightarrow
+%
+\RequirePackage[gen]{eurosym} % redefines \EUR
+\RequirePackage{textcomp}
+\RequirePackage{marvosym} % defines \EUR via \newcommand
+\RequirePackage{eurosym} % defines \EUR via \def
+%
+\RequirePackage{mflogo}
+\RequirePackage{cmmib57}% Use blueSky cmmib5 cmmib7 cmsy
+% UWAGA: Pakiet xy musi być dołączony do dokumentu po dołączeniu polski
+% bo polecenie \ar jest zdefiniowane w obu:
+%\RequirePackage[all,arrow]{xy} % do pliku głównego bo jest w konflikcie z xy
+%
+% Lets have some nice headings
+\pagestyle{fancyplain}
+\renewcommand{\chaptermark}[1]{\markboth{#1}{}}
+%% kwiecień 2000 :: dodajemy kropkę na końcu:
+%\renewcommand{\sectionmark}[1]{\markright{\thesection{} #1}}
+\renewcommand{\sectionmark}[1]{\markright{\thesection{.} #1}}
+\lhead[\fancyplain{}{\renewcommand\familydefault{\rmdefault}%
+ \normalfont \small\bfseries\thepage}]
+ {\fancyplain{}{\renewcommand\familydefault{\rmdefault}%
+ \normalfont \small\bfseries\rightmark}}
+\rhead[\fancyplain{}{\renewcommand\familydefault{\rmdefault}%
+ \normalfont
+ \small\bfseries\leftmark}]
+ {\fancyplain{}{\renewcommand\familydefault{\rmdefault}%
+ \normalfont \small\bfseries\thepage}}
+\cfoot[]{}
+\addtolength{\headheight}{1.6pt}
+%
+%
+% Earlier paragraphs were separated by some space
+%
+%\setlength{\parindent}{0pt}
+%\setlength{\parskip}{1.5ex plus 0.7ex minus 0.6ex}
+
+\newcommand{\CTANref}{\begingroup \urlstyle{tt}\Url} %
+\newcommand{\Postscript}{\PostScript} %% --tp--
+\newcommand{\PostScript}{Postscript} %% --tp--
+\newcommand{\PSi}{\PostScript\index{PostScript}}
+\newcommand{\EPSi}{Encapsulated \acro{PostScript}%
+\index{Encapsulated PostScript@Encapsulated \textsc{PostScript}}%
+\index{PostScript@\textsc{PostScript}!Encapsulated}}
+
+% Niektóre pozycje literatury są wyróżnione w ten sposób, że oprócz numeru
+% drukwany jest także skrót tytułu, zmieniam tylko na numer:
+\newcommand{\manual}{\cite{manual}}
+\newcommand{\companion}{\cite{companion}}
+\newcommand{\guide}{\cite{local}}
+\newcommand{\graphicscompanion}{\cite{graphicscompanion}}
+\newcommand{\hobby}{\cite{metapost}}
+\newcommand{\hoenig}{\cite{unbound}}
+\newcommand{\graphicsinlatex}{\cite{ursoswald}}
+%
+\newcommand{\contrib}[3]{#1\quad$<$\texttt{#2}$>${\small
+ \\\quad\textit{#3}}\par \vskip1ex}
+%
+% Some commands for helping with INDEX creation
+%\newcommand{\bs}{\symbol{'134}}%Print backslash
+\providecommand{\bs}{\symbol{'134}}%Print backslash
+%
+%\newcommand{\bs}{\ensuremath{\mathtt{\backslash}}}%Print backslash
+%
+% Index entry for a command (\cih for hidden command index)
+% \ci = do składu/indeksu ; \cih nie wstawia argumentu do składu
+\newcommand{\cih}[1]{%
+%\index{instrukcja!#1@\texttt{\bs#1}}% -- nie potrzeba --
+\index{#1@\texttt{\hspace*{-1.2ex}\bs #1}}}
+\newcommand{\ci}[1]{\cih{#1}\texttt{\bs#1}}
+\newcommand{\cmd}[1]{\texttt{\bs#1}}
+%
+% Package
+% pai = do składu/indeksu ; pkg = do składu
+\newcommand{\pai}[1]{%
+%\index{pakiet!#1@\textsf{#1}}% -- nie potrzeba --
+\index{#1@\textsf{#1}}%
+{\normalfont\textsf{#1}}}
+\def\pkg#1{{\normalfont\textsf{#1}}}
+%
+% Rozszerzenie plików? Nazwy plików (eei oraz eeih)
+% eei = do składu/indeksu ; ee = tylko do składu ; eeih = do indeksu
+\newcommand{\eei}[1]{\eeih{#1}\texttt{#1}}
+%\newcommand{\eeih}[1]{\index{rozszerzenie!\texttt{#1}}}
+% lepiej tak:
+\newcommand{\eeih}[1]{%%
+\if.\LSCAR#1\\% Pomiń wiodącą kropkę przy sortowaniu
+ \index{\LSCDR#1\\@\texttt{\hspace*{-1.2ex}#1} (plik)}\else
+ \index{#1@\texttt{#1} (plik)}\fi }
+\newcommand{\ee}[1]{\texttt{#1}}
+\def\LSCAR#1#2\\{#1}\def\LSCDR#1#2\\{#2}%makra pomocnicze
+%
+% Index entry for an environment
+% ei = do składu/indeksu ; envir = do składu
+\newcommand{\ei}[1]{%
+%\index{otoczenie!\texttt{#1}}% -- nie potrzeba --
+\index{#1@\texttt{#1}}\texttt{#1}}
+\def\envr#1{\texttt{#1}}
+%
+% Package/class option
+% popti = do składu/indeksu ; poptih = do indeksu ; popt = do składu
+\newcommand{\popti}[1]{\poptih{#1}\texttt{#1}}
+\newcommand{\poptih}[1]{\index{#1@\texttt{\emph{#1}}}}
+\newcommand{\popt}[1]{\texttt{#1}}
+%
+% Input Encoding
+% iei/fei = do składu/indeksu ; ieih/feih = tylko do indeksu
+\newcommand{\ieih}[1]{\index{kodowanie!#1@\texttt{\emph{#1}}}%
+ \index{#1@\texttt{\emph{#1}}}}
+\newcommand{\iei}[1]{\ieih{#1}\texttt{#1}}
+%
+%Font Encoding
+\newcommand{\feih}[1]{\index{kodowanie!#1@\texttt{\emph{#1}}}%
+ \index{#1@\texttt{\emph{#1}}}}
+\newcommand{\fei}[1]{\feih{#1}\texttt{#1}}
+%
+% Nazwy programów
+\newcommand{\prgi}[1]{\prgih{#1}#1}%
+\newcommand{\prgih}[1]{\index{#1@\protect\underline{#1}}}
+\newcommand{\prg}[1]{#1}%%
+%
+% Indexentry for a word (Word inserted into the text)
+\newcommand{\wi}[1]{\index{#1}#1}
+\newcommand{\wwi}[2]{\index{#2}#1}
+%
+\def\MSWindows{\prg{MS~Windows}}
+\def\MSWord{\prg{MS~Word}}
+\newcommand{\WYSIWYG}{\acro{WYSIWYG}}
+%
+% Typesetting Commands
+%
+\newenvironment{command}%
+ {\nopagebreak
+ \par\small
+ %\addvspace{3.2ex plus 0.8ex minus 0.2ex}% --tp--
+ \addvspace{2.0ex plus 0.5ex minus 0.25ex}%
+ \vskip -\parskip
+ \noindent%
+ \begin{tabular}{|l|}\hline\rule{0pt}{1em}\ignorespaces}%
+ {\\\hline\end{tabular}\par
+ \nopagebreak
+ %\addvspace{3.2ex plus 0.8ex minus 0.2ex}%
+ \addvspace{2.0ex plus 0.5ex minus 0.25ex}% --tp--
+ \vskip -\parskip}
+%
+% Type setting Code Fragments
+%
+\newenvironment{code}{%\smallskip % bez zbędnego odstępu
+ \begin{xquote}} % quote ma nie wiadomo po co wcięcie, dlatego
+ {\end{xquote} % definiujemy xquote, które nie ma wcięcia
+ %\smallskip %% ditto, jak początek
+ }
+%
+\newenvironment{xquote}
+ {\list{}{\leftmargin=0pt\rightmargin\leftmargin}%
+ \item\relax}{\endlist}
+%
+% Intro Environment
+\newenvironment{intro}{\sffamily}{\vspace*{2ex minus 1.5ex}}
+%
+%
+% Symbol Entry for Math Symbol Tables
+%
+\newcommand{\X}[1]{$#1$&\texttt{\string#1}\hspace*{1ex}}
+\newcommand{\Xwospc}[1]{$#1$&\texttt{\string#1}}% na potrzeby tabeli 3.3
+% normal text ....
+\newcommand{\SC}[1]{#1&\texttt{\string#1}\hspace*{1ex}}
+% for accents in text mode
+\newcommand{\A}[1]{#1&\texttt{\string#1}\hspace*{1ex}}
+\newcommand{\B}[2]{#1#2&\texttt{\string#1{} #2}\hspace*{1ex}}
+
+\newcommand{\W}[2]{$#1{#2}$&
+ \texttt{\string#1}\texttt{\string{\string#2\string}}\hspace*{1ex}}
+\newcommand{\Y}[1]{$\big#1$ &\texttt{\string#1}} %
+% Mathsymbol Table
+% Na razie taka ręczna korekta na wypadek za szerokich tabel:
+% \def\AdjustStBox{-10pt} dla stron parzystych wielkości ujemne, dla niep. dodatnie
+% wielkość przesunięcia jest drukowana do pliku .log
+% można to zautomatyzować ale na razie mi się nie chce [tp], bo korekta
+% dotyczy tylko 3 tabel (patrz lssym.tex)
+\def\AdjustStBoxReset{\def\Adjust@St@Box{\relax}}%
+\def\AdjustStBox#1{\def\Adjust@St@Box{\hspace*{#1}}}
+\AdjustStBoxReset
+\newdimen\STableWd
+%% [/tp]
+\newsavebox{\symbbox}
+\newenvironment{symbols}[1]%
+{\par\vspace*{2ex}
+\renewcommand{\arraystretch}{1.1}
+\begin{lrbox}{\symbbox}
+\hspace*{4ex}%% po co to? nieważne [tp]
+\begin{tabular}{@{}#1@{}}}%
+{\end{tabular}\end{lrbox}%
+%% [tp]
+%% Niektóre tabele są szersze niż \textwidth %% tp
+%% ten sam trik co dla przykładu:
+\STableWd=\wd\symbbox
+\ifdim\STableWd >\textwidth \advance \STableWd by -\textwidth
+\typeout{Uwaga ** tabela: \thetable\space jest o \the\STableWd\space szersza
+ od szer. kolumny **}%
+\fi
+%% -------------------> dodane \Adjust@St@Box oraz \AdjustStBoxReset
+%% to ostatnie zawsze resetuje \Adjust@St@Box aby zmiany dotyczyły
+%% tylko bierzącej tabeli
+%% [/tp]
+\makebox[\textwidth]{\Adjust@St@Box\usebox{\symbbox}%
+\AdjustStBoxReset}\par\medskip}
+%
+% Special Prep for AMS Symbols Printout
+% Should work if AMS is not available
+%
+% we have no PS versions of the rsfs fonts ... so this is a nogo for pdf
+%\ifpdf \else
+\IfFileExists{mathrsfs.sty}
+ {\RequirePackage{mathrsfs}\let\MathRSFS\mathscr\let\mathscr\relax}{}
+%\fi %% **// koniec \ifpdf //
+\IfFileExists{amssymb.sty}
+ {\let\noAMS\relax \RequirePackage{amssymb}}
+ {\def\noAMS{\endinput}\RequirePackage{latexsym}}
+\IfFileExists{eucal.sty}
+ {\RequirePackage[mathscr]{eucal}}
+ {\IfFileExists{euscript.sty}
+ {\RequirePackage{euscript}}{}}
+%\IfFileExists{eufrak.sty}
+% {\RequirePackage{eufrak}}{}
+\IfFileExists{amsbsy.sty}
+ {\RequirePackage{amsbsy}}{}
+%
+% Print |--| to show a distance
+\newcommand{\demowidth}[1]{\rule{0.3pt}{1.3ex}\rule{#1}{0.3pt}\rule{0.3pt}{1.3ex}}
+%
+% This is an environment to set LaTeX examples. On the left side the
+% source text and on the right side the typeset text.
+%
+% \begin{example}
+% \Large This is Large
+% \end{example}
+%
+% This Part is stolen from the verbatim.sty by FMi
+%
+\newwrite\example@out
+\newcounter{exacnt}
+\setcounter{exacnt}{1}
+
+\newlength{\savefboxrule}
+\newlength{\savefboxsep}
+\newlength{\outdent}
+\setlength{\outdent}{2cm}
+\addtolength{\headwidth}{\outdent}
+ %%
+\newenvironment{example}{\begingroup
+ \FormatChapterHeadinsideExample % zmniejsza odstępy/stopień pisma
+ \begingroup %% Lets Keep the Changes Local
+ \hfuzz 9.0pt %% może wystawać aż tyle
+ \@bsphack
+ \immediate\openout \example@out \jobname.exa
+ \let\do\@makeother\dospecials\catcode`\^^M\active
+ \def\verbatim@processline{%
+ \immediate\write\example@out{\the\verbatim@line}}%
+ \verbatim@start}%
+{\immediate\closeout\example@out\@esphack\endgroup%
+ \stepcounter{exacnt}%
+ \setlength{\parindent}{0pt}%
+ \par %%\nobreak
+ \addvspace{1.0ex plus 0.5ex minus 0.5ex}\vskip -\parskip
+ %%\nobreak
+ \noindent
+ \@ifundefined{r@exa:\theexacnt}{\hspace*{0pt}}{%
+ \ifpdf % We're not running pdftex
+ \ifx\realpageref\undefined
+ % HyPsd@pageref jest wewnętrznym poleceniem pakietu hyperref v 6.69c;
+ % natomiast we wcześniejszych wersjach pakietu działało polecenie `realpageref'
+ % dokładnie nie wiem kiedy przestało -- stąd kulawe rozwiązanie poprzez
+ % \undefined *** TP *** kwiecień ** 2000
+ % 12/2006 powyższe już chyba niepotrzebne, ale ww. działa więc nie ruszam (TP).
+ \ifodd\HyPsd@pageref{exa:\theexacnt}\hspace*{0pt}\else\hspace*{-\outdent}\fi%
+ \else
+ \ifodd\realpageref{exa:\theexacnt}\hspace*{0pt}\else\hspace*{-\outdent}\fi%
+ \fi
+ \else
+ \ifodd\pageref{exa:\theexacnt}%
+ \hspace*{0pt}\else\hspace*{-\outdent}\fi%
+ \fi
+}%
+%\fi
+ \makebox[\textwidth][l]{%
+ \raisebox{-\height}[0pt][\totalheight]{%
+ \begin{minipage}[t]{0.5\outdent+0.46\textwidth-3mm}%
+ \hfuzz\ExampleHFuzz%% *** TP ***
+ \small\verbatiminput{\jobname.exa}
+ \end{minipage}}%
+ \hspace{5mm}%
+ \setlength{\savefboxrule}{\fboxrule}%
+ \setlength{\fboxrule}{0.1pt}%
+ \setlength{\savefboxsep}{\fboxsep}%
+ \setlength{\fboxsep}{3mm}%
+ \raisebox{-\height}[0pt][\totalheight]{%
+ \fbox{%
+ \begin{minipage}[t]{%
+ 0.5\outdent+0.54\textwidth-2mm-2\fboxrule-2\fboxsep-0.7ex}%
+ \setlength{\fboxrule}{\savefboxrule}%
+ \setlength{\fboxsep}{\savefboxsep}%
+ \setlength{\fboxrule}{0.5pt}%
+ \setlength{\parskip}{1ex plus 0.4ex minus 0.2ex}%
+ \begin{trivlist}\item\small
+ \abovedisplayskip=3pt plus 1pt minus 1pt %% *** TP ***
+ \abovedisplayshortskip=3pt plus 1pt %%
+ \belowdisplayskip=3pt plus 1pt minus 1pt %% 2006
+ \belowdisplayshortskip=3pt plus 1pt %% 2006
+ \parskip0pt plus 0.5pt %% 2006
+ \input{\jobname.exa}
+ \end{trivlist}
+ \end{minipage}
+ }%
+ }%
+ }\label{exa:\theexacnt}%
+ \par
+ \endgroup %% *** TP ***
+ \addvspace{2.0ex plus 1.0ex minus 1.0ex}\vskip -\parskip
+ }
+
+\newenvironment{lined}[1]%
+ {\begin{center}\begin{minipage}{#1}\hrule\medskip}
+ %{\vspace{-1ex}\hrule \end{minipage}\end{center}} %%% *** TP **
+ {\smallskip \hrule \end{minipage}\end{center}}
+
+%
+% =========================================================================!
+%\newcommand{\TextVert}{\texttt{\char124}} % *** ? TP ****
+
+%
+% I want no headers on pages created by clearpage
+\renewcommand{\cleardoublepage}
+ {\clearpage\if@twoside \ifodd\c@page\else
+ \hbox{}\thispagestyle{empty}\newpage\if@twocolumn\hbox{}\newpage\fi\fi\fi}
+%
+% **************************** TP *************************************
+%
+% Redefinujemy wyliczenia usuwając odstępy między punktami
+% oraz przed i po wyliczeniach (bo takie są w Polsce zwyczaje)
+%
+\def\@listi{\leftmargin\leftmargini
+ \parsep 0\p@ \@plus1\p@ \@minus\p@
+ \topsep 3\p@ \@plus1\p@ \@minus\p@
+ \itemsep0\p@ \@plus1\p@ \@minus\p@}
+\let\@listI\@listi
+
+\renewcommand\small{%
+ \@setfontsize\small\@xpt\@xiipt
+ \abovedisplayskip 10\p@ \@plus2\p@ \@minus5\p@
+ \abovedisplayshortskip \z@ \@plus3\p@
+ \belowdisplayshortskip 6\p@ \@plus3\p@ \@minus3\p@
+ \def\@listi{\leftmargin\leftmargini
+ \topsep 3\p@ \@plus1\p@ \@minus\p@
+ \parsep 0\p@ \@plus1\p@ \@minus\p@
+ \itemsep \parsep}%
+ \belowdisplayskip \abovedisplayskip
+}
+\renewcommand\footnotesize{%
+ \@setfontsize\footnotesize\@ixpt{11}%
+ \abovedisplayskip 8\p@ \@plus2\p@ \@minus4\p@
+ \abovedisplayshortskip \z@ \@plus\p@
+ \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@
+ \def\@listi{\leftmargin\leftmargini
+ \topsep 3\p@ \@plus1\p@ \@minus0\p@
+ \parsep 0\p@ \@plus\p@ \@minus\p@
+ \itemsep \parsep}%
+ \belowdisplayskip \abovedisplayskip
+}
+
+% Definiujemy oryginalne angielskie funkcje trygonometryczne
+% (pakiet polski z opcją plmath i MeX przedefiniowuje je)
+%
+\def\EnglishTrygFunctions{%
+\def\arcsin{\mathop{\operator@font arcsin}\nolimits}%
+\def\arccos{\mathop{\operator@font arccos}\nolimits}%
+\def\tan{\mathop{\operator@font tan}\nolimits}%
+\def\tanh{\mathop{\operator@font tanh}\nolimits}%
+\def\coth{\mathop{\operator@font coth}\nolimits}%
+ }
+
+%
+% zmiana oryginalnego środowiska *** TP ***
+\renewenvironment{command}%
+ {\unskip %% *** TP ***
+ \nopagebreak %%
+ \par
+ \small
+ \addvspace{3.2ex plus 0.8ex minus 1.2ex}%
+ \vskip -\parskip
+ \noindent%
+ \begin{tabular}{|l|}\hline\rule{0pt}{1em}\ignorespaces}%
+ {\\\hline\end{tabular}\par
+ %\nopagebreak %% *** TP ***
+ \addvspace{3.2ex plus 0.8ex minus 1.2ex}%
+ \vskip -\parskip}
+
+%% Zmieniamy formatowanie śródtytułów jeżeli są użyte
+%% jako przykłady (mniejsze odstępny, mniejszy stopień pisma)
+%% jest to potrzebne w przykładzie nt. spisów bibliograficznych
+\def\FormatChapterHeadinsideExample{%
+\def\@makeschapterhead##1{%
+ \vspace*{18\p@}%
+ {\parindent \z@ \raggedright \normalfont
+ \interlinepenalty\@M
+ \large \bfseries ##1\par\nobreak
+ \vskip 12\p@ }}
+}
+
+% *** TP **
+\newenvironment{NoVSpace}{\def\addvspace##1{\par}}{}
+
+% Definicje dotyczące składania adresów internetowych
+% szczególnie w kontekście formatu PDF
+\newcommand{\MyCTANSite}{ftp://ftp.dante.de/tex-archive}
+\newcommand{\CTAN}[1]{%\url{ftp://ftp.dante.de/tex-archive/}
+ \begingroup
+ %
+ % BELOW we redefine low level hyperref command (which is risky)!
+ % In hyperref package
+ % \hyper@linkurl macro defined inside \url command has two arguments
+ % -- #1 is the printed text
+ % -- #2 is the url
+ % the idea is to print CTAN://xxxxxx
+ % but put an address of someting real, i.e. ftp.dante.de
+ %
+ \def\url@##1{\hyper@linkurl{\Hurl{CTAN://#1}}{\MyCTANSite/#1}}%
+ \url{CTAN://#1}%
+ \endgroup
+}
+\newcommand{\GUST}[1]{\url{ftp://ftp.gust.org.pl/TeX/#1}}
+\newcommand{\GUSThp}[1]{\url{http://www.gust.org.pl/#1}}
+
+\newcommand{\przypang}[1]{(ang.~\emph{{\language0 #1\/}})}
+
+\newcommand{\secby}[2]{\nopagebreak\par\addvspace{-1.5ex}%
+ %\vskip -\parskip\noindent{\tiny By #1 \mailto|#2|}\par\nopagebreak%
+ \vskip -\parskip\noindent{\tiny #1 \mailto|#2|}\par\nopagebreak%
+ \addvspace{1ex plus 0.8ex minus 0.2ex}%
+ \vskip -\parskip\noindent\ignorespaces}
+\renewcommand{\Email}{\begingroup \def\UrlLeft{<}\def\UrlRight{>} \urlstyle{tt}\Url} % email address
+\def\mailto|#1|{\href{mailto:#1}{\Email|#1|}} % url to mail somewhere
+
+%
+% To co poniżej dotyczy wersji w formacie PDF
+%
+\ifpdf
+ \def\TPFrontMatter{%
+ % Zmieniamy definicję rozdziału (zmienioną przez pakiet hyperref)
+ % ale tak, żeby to dotyczyło tylko wstępu, tj. wszystkiego przed
+ % deklaracją mainmatter.
+ \def\hyper@warn##1{\relax}% ***
+ % \def\@chapter[##1]##2{%
+ % \H@old@chapter[{##1}]{##2}%
+ % \if@mainmatter %%
+ % \@writetorep{##1}{chapter.\theHchapter}{0}%
+ % \else \fi
+ % }%
+ }
+%% Extra information to PDF general info *** TP ***
+ \def\@pdftitle{Nie za krotkie wprowadzenie do systemu LaTeXe}%
+ \def\@pdfauthor{T. Oetiker, H. Partl, E. Schlegl, I. Hyna, %
+ J. Goldasz, R. Kubiak, T. Przechlewski}%
+%\def\@pdfproducer{pdftex}%
+ \def\@pdfcreator{LaTeX with hyperref package}%
+ \def\@pdfsubject{LaTeX}%
+ \def\@pdfkeywords{Zobacz takze: http://www.GUST.org.pl}%
+\else
+ \def\TPFrontMatter{\relax}%
+ \def\pdfbookmark#1#2{\relax}%
+ %%\def\NoHyper{}
+ %%\def\endNoHyper{}
+\fi
+
+%% Uzupełnienia (kwiecień 2000):
+%% Dodanie kropki po numerach punktów i podpunktów
+\renewcommand*\@seccntformat[1]{\csname the#1\endcsname.\enspace}
+%% dodanie kropki w spisach treści, tabel i rysunków
+\def\numberline#1{\hb@xt@\@tempdima{#1.\hfil}} % !!!
+%%
+
+\renewenvironment{theindex}{%
+ \clearpage %%% <<---
+ \addtolength{\textwidth}{11mm}% zwiększ szerokość szpalty o 11m
+ \addtolength{\hsize}{11mm}%% ditto dla \hsize
+ %\addtolength{\headwidth}{-10mm} %% to jest niepotrzebne
+ \advance\linewidth11mm %% ten wymiar jest dla środowiska multicol
+ %% kolumna tekstu ma 10,5cm a kreska pod paginą 12,0
+ %%
+ %\input{multicol.sty}
+ \parskip\z@ \@plus .3\p@\relax \columnsep 9.9pt
+ %\advance \evensidemargin-15mm
+ % oryginalne nastawienia na 2-kolumny:
+ %\def\indexemdashes{%
+ %\def\@idxitem{\par\hangindent 0pt}
+ %\def\subitem{\par\hangindent 0pt --- }
+ %\def\subsubitem{\par\hangindent 0pt --- --- }
+ %\def\indexspace{\par \vskip 10pt plus 5pt minus 3pt\relax}}
+ %\indexemdashes
+ %
+ \renewcommand\@idxitem{\par\hangindent 12\p@\noindent}%%
+ \renewcommand\subitem{\@idxitem \hspace*{0\p@}$\triangleright$ }%%
+ %\renewcommand\subitem{\@idxitem \hspace*{0\p@}$\hookrightarrow$ }%%
+ \let\item\@idxitem
+ \chapter*{Skorowidz}\@mkboth{\indexname}{\indexname}%
+ \addcontentsline{toc}{chapter}{\indexname}%
+ \UwagaDoSkorowidza \endgraf
+\rightskip0pt plus4em
+\pretolerance10001
+\begin{multicols}{3}}{%
+% etykieta verylast ustala liczbę stron w dokumencie
+% oryginalnie była doczepiona do ostatniego hasła w skorowidzu (por. plik spec.tex)
+\label{verylast}\end{multicols}}
+
+%% Wpisanie minut/minuty w zależności od liczby minut:
+%% Polecenie to wykorzystuje wewnętrzne polecenie pakietu hyperref `\HyPsd@pageref',
+%% które jest używane zamiast \pageref, bo to ostatnie bruździ
+\def\IleMinut#1{%
+ % http://groups.google.pl/group/comp.text.tex/browse_frm/thread/2d172e2c641e681a/
+ %\def\@tmp@arga{#1}\def\@tmp@arg@empty{??}%
+ \expandafter\ifx\csname r@#1\endcsname\relax ?? minut\else % sprawdza czy etykieta
+ \ifpdf \def\IleJestMinut{\HyPsd@pageref{#1}}\else % verylast jest zdefiniowana
+ \def\IleJestMinut{\pageref{#1}}\fi%
+ %
+ % Teraz wyznaczamy resztę z dzielenia modulo, całkowitej liczby stron przez 10
+ \@tempcnta=\IleJestMinut
+ \@tempcntb=\@tempcnta
+ \divide\@tempcntb by 10
+ \multiply\@tempcntb by -10
+ \advance\@tempcnta by \@tempcntb
+ % licznik \@tempcnta zawiera (<counter> mod n)
+ \ifnum\@tempcnta=2 \def\MinTxt{minuty}\else % Minuty/Minut
+ \ifnum\@tempcnta=3 \def\MinTxt{minuty}\else
+ \ifnum\@tempcnta=4 \def\MinTxt{minuty}\else
+ \def\MinTxt{minut}\fi\fi\fi
+ \IleJestMinut~\MinTxt \fi }
+
+\endinput