Bug 20991: Do not lost patron's category when editing a patron

[koha.git] / members / printslip.pl

diff --git a/members/printslip.pl b/members/printslip.pl
index c7331af..a3d2d50 100755 (executable)
--- a/members/printslip.pl
+++ b/members/printslip.pl
@@ -73,6 +73,11 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
 );
 
 my $borrowernumber = $input->param('borrowernumber');
+
+my $logged_in_user = Koha::Patrons->find( $loggedinuser ) or die "Not logged in";
+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);
 if (my $letter = IssueSlip ($session->param('branch') || $branch, $borrowernumber, $print eq "qslip")) {