Bug 21395: Make perlcritic happy

[koha-equinox.git] / C4 / Items.pm

diff --git a/C4/Items.pm b/C4/Items.pm
index a162ac5..53bf3ed 100644 (file)
--- a/C4/Items.pm
+++ b/C4/Items.pm
@@ -224,7 +224,6 @@ Additional information appropriate to the error condition.
 
 sub AddItemBatchFromMarc {
     my ($record, $biblionumber, $biblioitemnumber, $frameworkcode) = @_;
-    my $error;
     my @itemnumbers = ();
     my @errors = ();
     my $dbh = C4::Context->dbh;