From 9b5e269c5f81d14761048fed26cfe3779fda37b3 Mon Sep 17 00:00:00 2001
From: Aleisha Amohia <aleishaamohia@hotmail.com>
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
---
 members/printslip.pl | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/members/printslip.pl b/members/printslip.pl
index 368d84cc7f2..e71d95f3e7c 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;
 
@@ -91,17 +91,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