Bug 32843: Fix cataloguing/value_builder/unimarc_field_124a.pl

[koha-ffzg.git] / labels / label-edit-batch.pl

diff --git a/labels/label-edit-batch.pl b/labels/label-edit-batch.pl
index c263bc4..230291e 100755 (executable)
--- a/labels/label-edit-batch.pl
+++ b/labels/label-edit-batch.pl
@@ -22,10 +22,11 @@ use Modern::Perl;
 
 use CGI qw ( -utf8 );
 
-use C4::Auth qw(get_template_and_user);
-use C4::Output qw(output_html_with_http_headers);
-use C4::Creators;
+use C4::Auth qw( get_template_and_user );
+use C4::Circulation qw( barcodedecode );
+use C4::Creators qw( get_label_summary html_table );
 use C4::Labels;
+use C4::Output qw( output_html_with_http_headers );
 
 use Koha::Items;
 
@@ -89,6 +90,7 @@ elsif ($op eq 'add') {
                 push @item_numbers, $number;
             }
             elsif ($number_type eq "barcode" ) {  # we must test in case an invalid barcode is passed in; we effectively disgard them atm
+                $number = barcodedecode($number);
                 my $item = Koha::Items->find({barcode => $number});
                 push @item_numbers, $item->itemnumber if $item;
             }