@@ -, +, @@ use clone --- koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/print.tt | 2 +- patroncards/create-pdf.pl | 5 +---- 2 files changed, 2 insertions(+), 5 deletions(-) --- a/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/print.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/print.tt @@ -49,7 +49,7 @@ [% ELSIF ( patronlist_id && template_id && layout_id ) %]

Click on the link to download the patron cards from the patron list.

- label_patronlist_[% patronlist_id %].pdf + label_patronlist_[% patronlist_id %].pdf

[% ELSE %]

--- a/patroncards/create-pdf.pl +++ a/patroncards/create-pdf.pl @@ -26,7 +26,6 @@ use Graphics::Magick; use XML::Simple; use POSIX qw(ceil); use autouse 'Data::Dumper' => qw(Dumper); -use Clone qw(clone); use C4::Debug; use C4::Context; @@ -131,10 +130,8 @@ if ($layout_xml->{'page_side'} eq 'B') { # rearrange items on backside of page t CARD_ITEMS: foreach my $item (@{$items}) { if ($item) { - -#my $print_layout_xml = $layout_back_xml; my $print_layout_xml = (( ($cardscount % 2 == 1) && ( $layout_back_id ) ) ? - clone($layout_back_xml) : clone($layout_xml) ); + $layout_back_xml : $layout_xml ); $cardscount ++; my $borrower_number = $item->{'borrower_number'}; --