View | Details | Raw Unified | Return to bug 23589
Collapse All | Expand All

(-)a/Koha/Patron/Discharge.pm (-2 / +19 lines)
Lines 142-148 sub generate_as_pdf { Link Here
142
    else {
142
    else {
143
        my $pdf = PDF::FromHTML->new( encoding => 'utf-8' );
143
        my $pdf = PDF::FromHTML->new( encoding => 'utf-8' );
144
        $pdf->load_file( $html_path );
144
        $pdf->load_file( $html_path );
145
        $pdf->convert;
145
146
        my $ttf = C4::Context->config('ttf');
147
        if ( $ttf  && exists $ttf->{font} ) {
148
149
            my $type2path;
150
            foreach my $font ( @{ $ttf->{font} } ) {
151
                    $type2path->{ $font->{type} } = $font->{content};
152
            }
153
154
            $pdf->convert(
155
                FontBold          => $type2path->{'HB'} || 'HelveticaBold',
156
                FontOblique       => $type2path->{'HO'} || 'HelveticaOblique',
157
                FontBoldOblique   => $type2path->{'HBO'}|| 'HelveticaBoldOblique',
158
                FontUnicode       => $type2path->{'H'}  || 'Helvetica',
159
                Font              => $type2path->{'H'}  || 'Helvetica',
160
            );
161
        } else {
162
            $pdf->convert();
163
        }
146
        $pdf->write_file( $pdf_path );
164
        $pdf->write_file( $pdf_path );
147
    }
165
    }
148
166
149
- 

Return to bug 23589