Bug 21395: Make perlcritic happy

[koha.git] / C4 / Accounts.pm

diff --git a/C4/Accounts.pm b/C4/Accounts.pm
index 92365ea..bf8076d 100644 (file)
--- a/C4/Accounts.pm
+++ b/C4/Accounts.pm
@@ -148,7 +148,6 @@ sub manualinvoice {
 
     my $manager_id = C4::Context->userenv ? C4::Context->userenv->{'number'} : undef;
     my $dbh      = C4::Context->dbh;
-    my $insert;
     my $amountleft = $amount;
 
     my $branchcode = C4::Context->userenv ? C4::Context->userenv->{'branch'} : undef;