diff --git a/cataloguing/moveitem.pl b/cataloguing/moveitem.pl
index 66a4489415..e7cb70c5cd 100755
--- a/cataloguing/moveitem.pl
+++ b/cataloguing/moveitem.pl
@@ -46,7 +46,7 @@ my $op = $query->param('op') || q{};
 my $biblionumber = $query->param('biblionumber');
 
 # The barcode of the item to move
-my $barcode = barcodedecode( $query->param('barcode') );
+my $barcode = barcodedecode( scalar $query->param('barcode') );
 
 my $biblio = Koha::Biblios->find($biblionumber);
 $template->param( biblio       => $biblio );