Fix some typos in CircCommon.pm.

Signed-off-by: Jason Stephenson <jason@sigio.com>

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 8bfe7b8..86b0103 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/CircCommon.pm
@@ -559,15 +559,15 @@ sub real_void_bills {
                     my $btype = $bill->btype();
                     if ($btype == 1) {
                         # Overdues
-                        $amount_to_void = $xact_total unless(_check_payment_interval($bpenty, $neg_balance_interval_overdues));
+                        $amount_to_void = $xact_total unless(_check_payment_interval($bpentry, $neg_balance_interval_overdues));
                         $amount_to_void = $xact_total if ($U->is_true($neg_balance_overdues));
                     } elsif ($btype == 3 || $btype == 10) {
                         # Lost or Long Overdue
-                        $amount_to_void = $xact_total unless(_check_payment_interval($bpenty, $neg_balance_interval_lost));
+                        $amount_to_void = $xact_total unless(_check_payment_interval($bpentry, $neg_balance_interval_lost));
                         $amount_to_void = $xact_total if ($U->is_true($neg_balance_lost));
                     } else {
                         # Any other bill that we're trying to void.
-                        $amount_to_void = $xact_total unless(_check_payment_interval($bpenty, $neg_balance_interval_default));
+                        $amount_to_void = $xact_total unless(_check_payment_interval($bpentry, $neg_balance_interval_default));
                         $amount_to_void = $xact_total if ($U->is_true($neg_balance_default));
                     }
                 }