summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2010-06-19 18:59:06 +0000
committerivan <ivan>2010-06-19 18:59:06 +0000
commite3df3b2b03e37d68d82a38eaf8fc19d56d59ceee (patch)
tree1df3bf73f461906f91da10038f74cfec72e9ef10
parent5fc27d11b1f5cf689cf83e35c8fc6bfffd4ffe8e (diff)
should fix FS::svc_acct=HASH(0xe854058) errors inserting payments, fallout from opensrs on #5825, RT#8853
-rw-r--r--FS/FS/cust_bill_ApplicationCommon.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/cust_bill_ApplicationCommon.pm b/FS/FS/cust_bill_ApplicationCommon.pm
index 322728fad..afb90f40e 100644
--- a/FS/FS/cust_bill_ApplicationCommon.pm
+++ b/FS/FS/cust_bill_ApplicationCommon.pm
@@ -418,10 +418,10 @@ sub apply_to_lineitems {
foreach my $cust_svc ( $cust_pkg->cust_svc ) {
my $svc_x = $cust_svc->svc_x;
- my @part_export = grep { $_->can('export_insert_on_payment') }
+ my @part_export = grep { $_->can('_export_insert_on_payment') }
$cust_svc->part_svc->part_export;
- foreach my $part_export ( $cust_svc->part_svc->part_export ) {
+ foreach my $part_export ( @part_export ) {
$error = $part_export->_export_insert_on_payment($svc_x);
if ( $error ) {
$dbh->rollback if $oldAutoCommit;