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