From: Jason Stephenson Date: Mon, 7 Oct 2013 00:31:43 +0000 (-0400) Subject: Fix stupido in CircCommon->unvoid_bill(). X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=f2f71519a4254205485e16dc5a29e5aa1602fd20;p=evergreen%2Fequinox.git Fix stupido in CircCommon->unvoid_bill(). Signed-off-by: Jason Stephenson --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm index db0d8cec1f..526a98cafb 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm @@ -110,11 +110,11 @@ sub unvoid_bill { # Get and editor, check for a session, and check that we can void # bills. (If we can void bills, we can unvoid them, too.) - my $ed = new_editor (authtoken => $authtoken, xact => 1); + my $e = new_editor (authtoken => $authtoken, xact => 1); return $e->die_event unless $e->checkauth; return $e->die_event unless $e->allowed('VOID_BILLING'); - my $voids = $ed->search_money_void_payment( + my $voids = $e->search_money_void_payment( { billing => $bill->id() } @@ -123,12 +123,12 @@ sub unvoid_bill { if ($voids && @$voids) { my $void_total = 0; map {$void_total += $_->amount()} @$voids; - my $result = $class->create_bill($ed, $void_total, $bill->btype(), $bill->billing_type(), $bill->xact(), $note); + my $result = $class->create_bill($e, $void_total, $bill->btype(), $bill->billing_type(), $bill->xact(), $note); if ($result) { - $ed->rollback(); + $e->rollback(); return $result; } - $ed->commit; + $e->commit; } return undef;