From 9e11576caa87e40456255e727df4379ec799f672 Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle@bywatersolutions.com>
Date: Thu, 8 Mar 2012 14:35:08 -0500
Subject: [PATCH] Bug 7597 - Part 5 - Remove my from $branch, which was masking
 previous declaration

Signed-off-by: Nicole C. Engard <nengard@bywatersolutions.com>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
---
 C4/Accounts.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Accounts.pm b/C4/Accounts.pm
index 17db19125c..b7aef01ec8 100644
--- a/C4/Accounts.pm
+++ b/C4/Accounts.pm
@@ -780,7 +780,7 @@ C<$branch> is the branchcode of the library where the writeoff occurred.
 
 sub WriteOffFee {
     my ( $borrowernumber, $accountnum, $itemnum, $accounttype, $amount, $branch ) = @_;
-    my $branch ||= C4::Context->userenv->{branch};
+    $branch ||= C4::Context->userenv->{branch};
     my $manager_id = 0;
     $manager_id = C4::Context->userenv->{'number'} if C4::Context->userenv;
 
-- 
2.39.2