From ca591670b4631c4644c55663f70ef5dbb5486a7d Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Thu, 8 Mar 2012 14:35:08 -0500 Subject: [PATCH] [SIGNED-OFF] Bug 7597 - Part 5 - Remove my from $branch, which was masking previous declaration Signed-off-by: Nicole C. Engard --- C4/Accounts.pm | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/C4/Accounts.pm b/C4/Accounts.pm index 0372d17..3b82bc9 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; -- 1.7.2.3