|
Lines 24-29
Link Here
|
| 24 |
use strict; |
24 |
use strict; |
| 25 |
use warnings; |
25 |
use warnings; |
| 26 |
use CGI; |
26 |
use CGI; |
|
|
27 |
use URI::Escape; |
| 28 |
|
| 27 |
use C4::Output; |
29 |
use C4::Output; |
| 28 |
use C4::Print; |
30 |
use C4::Print; |
| 29 |
use C4::Auth qw/:DEFAULT get_session/; |
31 |
use C4::Auth qw/:DEFAULT get_session/; |
|
Lines 101-107
my @failedreturns = $query->param('failedreturn');
Link Here
|
| 101 |
our %return_failed = (); |
103 |
our %return_failed = (); |
| 102 |
for (@failedreturns) { $return_failed{$_} = 1; } |
104 |
for (@failedreturns) { $return_failed{$_} = 1; } |
| 103 |
|
105 |
|
| 104 |
my $findborrower = $query->param('findborrower') || q{}; |
106 |
my $findborrower = uri_unescape($query->param('findborrower')) || q{}; |
|
|
107 |
utf8::decode($findborrower); |
| 105 |
$findborrower =~ s|,| |g; |
108 |
$findborrower =~ s|,| |g; |
| 106 |
my $borrowernumber = $query->param('borrowernumber'); |
109 |
my $borrowernumber = $query->param('borrowernumber'); |
| 107 |
|
110 |
|
| 108 |
- |
|
|