X-Git-Url: https://git.mdrn.pl/librarian.git/blobdiff_plain/8a57745b13b2875fcf6441b06171a1fd762c51ee..0c0fdd2db2c1277108b03a1acf88ad63d140451a:/librarian/pdf/wl.cls diff --git a/librarian/pdf/wl.cls b/librarian/pdf/wl.cls index 989f73e..e5a4943 100644 --- a/librarian/pdf/wl.cls +++ b/librarian/pdf/wl.cls @@ -12,6 +12,7 @@ % a4paper,... - paper size as required by LaTeX % nowlfont - don't use customized WL font +\RequirePackage{fixltx2e} \RequirePackage{setspace} \RequirePackage{type1cm} \DeclareOption{13pt}{% @@ -381,11 +382,73 @@ Letters={Uppercase} \end{em}% } +\newlength{\fboxhsep} +\newlength{\fboxvsep} + +\newlength{\fboxtoprule} +\newlength{\fboxbottomrule} +\newlength{\fboxleftrule} +\newlength{\fboxrightrule} + +\setlength{\fboxhsep}{5\fboxsep} +\setlength{\fboxvsep}{20\fboxsep} + +\setlength{\fboxtoprule}{\fboxrule} +\setlength{\fboxleftrule}{\fboxrule} +\setlength{\fboxrightrule}{\fboxrule} +\setlength{\fboxbottomrule}{\fboxrule} + + + +\def\@frameb@xother#1{% + \@tempdima\fboxtoprule + \advance\@tempdima\fboxvsep + \advance\@tempdima\dp\@tempboxa + \hbox{% + \lower\@tempdima\hbox{% + \vbox{% + \hrule\@height\fboxtoprule + \hbox{% + \vrule\@width\fboxleftrule + #1% + \vbox{% + \vskip\fboxvsep + \box\@tempboxa + \vskip\fboxvsep}% + #1% + \vrule\@width\fboxrightrule}% + \hrule\@height\fboxbottomrule}% + }% + }% +} + + +\long\def\fboxother#1{% + \leavevmode + \setbox\@tempboxa\hbox{% + \color@begingroup + \kern\fboxhsep{#1}\kern\fboxhsep + \color@endgroup}% + \@frameb@xother\relax} + +\newcommand{\myfbox}[3]{% + \begingroup + \setlength{\fboxhsep}{#1} + \setlength{\fboxvsep}{#2} + \fboxother{#3} + + \endgroup +} + \newcommand{\ramka}[1]{% -\noindent\fbox{% -\parbox{\textwidth}{% +\par\vspace{1em}% +\edef\myindent{\the\parindent}% +\noindent\myfbox{1em}{1em}{% +\parbox{\dimexpr \textwidth - 2\fboxhsep - 2\fboxrule\relax}{% +\setlength{\parindent}{\myindent}% #1% }}% +\vspace{1em}% } \newcommand{\dlugicytat}[1]{% @@ -443,7 +506,7 @@ Letters={Uppercase} } \newcommand{\naglowekosoba}[1]{% -\par{\textsc{#1}}\nopagebreak% +\par{\textsc{\MakeLowercase{#1}}}\nopagebreak% } \newcommand{\naglowekpodrozdzial}[1]{% \vspace{5ex}\par{#1}\nopagebreak%