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 abdffaa..4433914 100644 (file)
--- a/librarian/pdf/wl.cls
+++ b/librarian/pdf/wl.cls
@@ -410,8 +410,10 @@ Letters={Uppercase}
 
 \newcommand{\ramka}[1]{%
 \par\vspace{1em}%
+\edef\myindent{\the\parindent}%
 \noindent\myfbox{1em}{1em}{%
-\parbox{\textwidth}{%
+\parbox{\dimexpr \textwidth - 2\fboxhsep - 2\fboxrule\relax}{%
+\setlength{\parindent}{\myindent}%
 #1%
 }}%
 \vspace{1em}%