diff --git a/cataloguing/moveitem.pl b/cataloguing/moveitem.pl index ec59c258ff..03ca711694 100755 --- a/cataloguing/moveitem.pl +++ b/cataloguing/moveitem.pl @@ -23,6 +23,7 @@ use Modern::Perl; use CGI qw ( -utf8 ); use C4::Auth qw( get_template_and_user ); +use C4::Circulation qw( barcodedecode ); use C4::Output qw( output_html_with_http_headers ); use Koha::Biblios; @@ -34,7 +35,8 @@ my $query = CGI->new; my $biblionumber = $query->param('biblionumber'); # The barcode of the item to move -my $barcode = $query->param('barcode'); +my $barcode = barcodedecode($query->param('barcode')); + my ($template, $loggedinuser, $cookie) = get_template_and_user( {