|
Lines 176-182
sub barcodedecode {
Link Here
|
| 176 |
my ($barcode, $filter) = @_; |
176 |
my ($barcode, $filter) = @_; |
| 177 |
my $branch = C4::Context::mybranch(); |
177 |
my $branch = C4::Context::mybranch(); |
| 178 |
$filter = C4::Context->preference('itemBarcodeInputFilter') unless $filter; |
178 |
$filter = C4::Context->preference('itemBarcodeInputFilter') unless $filter; |
| 179 |
($barcode) = Koha::Plugins->call('item_barcode_transform', $barcode ) || $barcode; |
179 |
($barcode) = Koha::Plugins->call_recursive('item_barcode_transform', $barcode ); |
| 180 |
$filter or return $barcode; # ensure filter is defined, else return untouched barcode |
180 |
$filter or return $barcode; # ensure filter is defined, else return untouched barcode |
| 181 |
if ($filter eq 'whitespace') { |
181 |
if ($filter eq 'whitespace') { |
| 182 |
$barcode =~ s/\s//g; |
182 |
$barcode =~ s/\s//g; |