Lines 166-172
sub barcodedecode {
Link Here
|
166 |
my ($barcode, $filter) = @_; |
166 |
my ($barcode, $filter) = @_; |
167 |
my $branch = C4::Context::mybranch(); |
167 |
my $branch = C4::Context::mybranch(); |
168 |
$filter = C4::Context->preference('itemBarcodeInputFilter') unless $filter; |
168 |
$filter = C4::Context->preference('itemBarcodeInputFilter') unless $filter; |
169 |
($barcode) = Koha::Plugins->call('item_barcode_transform', $barcode ) || $barcode; |
169 |
($barcode) = Koha::Plugins->call_recursive('item_barcode_transform', $barcode ); |
170 |
$filter or return $barcode; # ensure filter is defined, else return untouched barcode |
170 |
$filter or return $barcode; # ensure filter is defined, else return untouched barcode |
171 |
if ($filter eq 'whitespace') { |
171 |
if ($filter eq 'whitespace') { |
172 |
$barcode =~ s/\s//g; |
172 |
$barcode =~ s/\s//g; |