From 5b13f2676cad331ba3f656b8978300d2b8d28ed7 Mon Sep 17 00:00:00 2001 From: Aleisha Amohia Date: Fri, 21 Apr 2023 03:03:45 +0000 Subject: [PATCH] Bug 33478: Apply formatting to ISSUESLIP, ISSUEQSLIP, CHECKINSLIP To test: 1. Check out an item to a patron 2. Click Print in the members toolbar, then Print quick slip 3. Confirm your format settings for ISSUEQSLIP are applied 4. Click Print in the members toolbar, then Print slip 5. Confirm your format settings for ISSUESLIP are applied 6. Return the item 7. When the item is checked in, click the 'Print checkin slip' button 8. Confirm your format settings for CHECKINSLIP are applied Signed-off-by: Sam Lau --- members/printslip.pl | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/members/printslip.pl b/members/printslip.pl index 7971f83c676..2b76aadd889 100755 --- a/members/printslip.pl +++ b/members/printslip.pl @@ -66,7 +66,7 @@ my $patron = Koha::Patrons->find( $borrowernumber ); output_and_exit_if_error( $input, $cookie, $template, { module => 'members', logged_in_user => $logged_in_user, current_patron => $patron } ); my $branch=C4::Context->userenv->{'branch'}; -my ($slip, $is_html); +my $slip; if ( $print eq 'checkinslip' ) { my $checkinslip_branch = $session->param('branch') ? $session->param('branch') : $branch; @@ -89,17 +89,14 @@ if ( $print eq 'checkinslip' ) { message_transport_type => 'print' ); - $slip = $letter->{content}; - $is_html = $letter->{is_html}; + $slip = $letter; } elsif (my $letter = IssueSlip ($session->param('branch') || $branch, $borrowernumber, $print eq "qslip")) { - $slip = $letter->{content}; - $is_html = $letter->{is_html}; + $slip = $letter; } $template->param( slip => $slip, - plain => !$is_html, borrowernumber => $borrowernumber, caller => 'members', stylesheet => C4::Context->preference("SlipCSS"), -- 2.30.2