Fix font-optimizer for Perl 5.18.

[librarian.git] / librarian / pdf / wl.cls

diff --git a/librarian/pdf/wl.cls b/librarian/pdf/wl.cls
index de506ae..4433914 100644 (file)
--- a/librarian/pdf/wl.cls
+++ b/librarian/pdf/wl.cls
@@ -409,10 +409,14 @@ Letters={Uppercase}
 }
 
 \newcommand{\ramka}[1]{%
 }
 
 \newcommand{\ramka}[1]{%

+\par\vspace{1em}%
+\edef\myindent{\the\parindent}%

 \noindent\myfbox{1em}{1em}{%
 \noindent\myfbox{1em}{1em}{%

-\parbox{\textwidth}{%
+\parbox{\dimexpr \textwidth - 2\fboxhsep - 2\fboxrule\relax}{%
+\setlength{\parindent}{\myindent}%

 #1%
 }}%
 #1%
 }}%

+\vspace{1em}%

 }
 
 \newcommand{\dlugicytat}[1]{%
 }
 
 \newcommand{\dlugicytat}[1]{%