Lines 43-53
my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
Link Here
|
43 |
debug => 1, |
43 |
debug => 1, |
44 |
} |
44 |
} |
45 |
); |
45 |
); |
46 |
my @items = $query->param('item'); |
46 |
my @items = $query->param('item'); |
47 |
|
47 |
|
48 |
my $opacrenew = C4::Context->preference("OpacRenewalAllowed"); |
48 |
my $opacrenew = C4::Context->preference("OpacRenewalAllowed"); |
49 |
|
49 |
|
50 |
my $errorstring=''; |
50 |
my $errorstring = q{}; |
|
|
51 |
my $renewed = q{}; |
52 |
|
51 |
my $member_details = GetMemberDetails($borrowernumber); |
53 |
my $member_details = GetMemberDetails($borrowernumber); |
52 |
|
54 |
|
53 |
if ( $member_details->{'BlockExpiredPatronOpacActions'} |
55 |
if ( $member_details->{'BlockExpiredPatronOpacActions'} |
Lines 56-61
if ( $member_details->{'BlockExpiredPatronOpacActions'}
Link Here
|
56 |
$errorstring = 'card_expired'; |
58 |
$errorstring = 'card_expired'; |
57 |
} |
59 |
} |
58 |
else { |
60 |
else { |
|
|
61 |
my @renewed; |
59 |
for my $itemnumber (@items) { |
62 |
for my $itemnumber (@items) { |
60 |
my ( $status, $error ) = |
63 |
my ( $status, $error ) = |
61 |
CanBookBeRenewed( $borrowernumber, $itemnumber ); |
64 |
CanBookBeRenewed( $borrowernumber, $itemnumber ); |
Lines 81-92
else {
Link Here
|
81 |
$branchcode = 'OPACRenew'; |
84 |
$branchcode = 'OPACRenew'; |
82 |
} |
85 |
} |
83 |
AddRenewal( $borrowernumber, $itemnumber, $branchcode ); |
86 |
AddRenewal( $borrowernumber, $itemnumber, $branchcode ); |
|
|
87 |
push( @renewed, $itemnumber ); |
84 |
} |
88 |
} |
85 |
else { |
89 |
else { |
86 |
$errorstring .= $error . "|"; |
90 |
$errorstring .= $error . "|"; |
87 |
} |
91 |
} |
88 |
} |
92 |
} |
|
|
93 |
$renewed = join( '|', @renewed ); |
89 |
} |
94 |
} |
90 |
|
95 |
|
91 |
print $query->redirect("/cgi-bin/koha/opac-user.pl?renew_error=$errorstring"); |
96 |
print $query->redirect("/cgi-bin/koha/opac-user.pl?renew_error=$errorstring&renewed=$renewed"); |
92 |
|
97 |
|