|
Lines 86-96
my $barcodes = [];
Link Here
|
| 86 |
my $barcode = $query->param('barcode'); |
86 |
my $barcode = $query->param('barcode'); |
| 87 |
my $findborrower; |
87 |
my $findborrower; |
| 88 |
my $autoswitched; |
88 |
my $autoswitched; |
|
|
89 |
my $borrowernumber = $query->param('borrowernumber'); |
| 89 |
|
90 |
|
| 90 |
if (C4::Context->preference("AutoSwitchPatron") && $barcode) { |
91 |
if (C4::Context->preference("AutoSwitchPatron") && $barcode) { |
| 91 |
if (Koha::Patrons->search( { cardnumber => $barcode} )->count() > 0) { |
92 |
if (Koha::Patrons->search( { cardnumber => $barcode} )->count() > 0) { |
| 92 |
$findborrower = $barcode; |
93 |
$findborrower = $barcode; |
| 93 |
undef $barcode; |
94 |
undef $barcode; |
|
|
95 |
undef $borrowernumber; |
| 94 |
$autoswitched = 1; |
96 |
$autoswitched = 1; |
| 95 |
} |
97 |
} |
| 96 |
} |
98 |
} |
|
Lines 118-124
if ( $barcode || ( defined($barcode) && $barcode eq '0' ) ) {
Link Here
|
| 118 |
$barcodes = [ uniq @$barcodes ]; |
120 |
$barcodes = [ uniq @$barcodes ]; |
| 119 |
|
121 |
|
| 120 |
my $template_name = q|circ/circulation.tt|; |
122 |
my $template_name = q|circ/circulation.tt|; |
| 121 |
my $borrowernumber = $query->param('borrowernumber'); |
|
|
| 122 |
my $patron = $borrowernumber ? Koha::Patrons->find( $borrowernumber ) : undef; |
123 |
my $patron = $borrowernumber ? Koha::Patrons->find( $borrowernumber ) : undef; |
| 123 |
my $batch = $query->param('batch'); |
124 |
my $batch = $query->param('batch'); |
| 124 |
my $batch_allowed = 0; |
125 |
my $batch_allowed = 0; |
| 125 |
- |
|
|