diff options
| author | mark <mark> | 2012-02-03 20:24:56 +0000 |
|---|---|---|
| committer | mark <mark> | 2012-02-03 20:24:56 +0000 |
| commit | f5636268e67c4bd66f9b9e2eaf5bf816e885b216 (patch) | |
| tree | c6aa860590d2dc6d543ec68bbc476ff070e98140 | |
| parent | a0124adf19658d403f5b6ebb0cc0c7bb862d4c98 (diff) | |
unbreak package churn report, fallout from #15393
| -rw-r--r-- | FS/FS/Report/Table.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/FS/FS/Report/Table.pm b/FS/FS/Report/Table.pm index b5805e37f..9d85b9de8 100644 --- a/FS/FS/Report/Table.pm +++ b/FS/FS/Report/Table.pm @@ -546,12 +546,12 @@ sub cust_bill_pkg_discount { } -sub setup_pkg { shift->pkg_field( @_, 'setup' ); } -sub susp_pkg { shift->pkg_field( @_, 'susp' ); } -sub cancel_pkg { shift->pkg_field( @_, 'cancel'); } +sub setup_pkg { shift->pkg_field( 'setup', @_ ); } +sub susp_pkg { shift->pkg_field( 'susp', @_ ); } +sub cancel_pkg { shift->pkg_field( 'cancel', @_ ); } sub pkg_field { - my( $self, $speriod, $eperiod, $agentnum, $field ) = @_; + my( $self, $field, $speriod, $eperiod, $agentnum ) = @_; $self->scalar_sql(" SELECT COUNT(*) FROM cust_pkg LEFT JOIN cust_main USING ( custnum ) |