X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_bill_pkg.pm;h=c71ebf4145424fba29c585f6cd501730bed389bb;hb=17ca8b897e82cffb3731a63ccae1fb12494a7246;hp=f94bf9b19321ff9f03770d3e26e95679e2b937f7;hpb=35e5b12fb55f229edd16bed66e21c5806b8d3b7e;p=freeside.git diff --git a/FS/FS/cust_bill_pkg.pm b/FS/FS/cust_bill_pkg.pm index f94bf9b19..c71ebf414 100644 --- a/FS/FS/cust_bill_pkg.pm +++ b/FS/FS/cust_bill_pkg.pm @@ -8,7 +8,6 @@ use List::Util qw( sum min ); use Text::CSV_XS; use FS::Record qw( qsearch qsearchs dbh ); use FS::cust_pkg; -use FS::cust_bill; use FS::cust_bill_pkg_detail; use FS::cust_bill_pkg_display; use FS::cust_bill_pkg_discount; @@ -511,13 +510,6 @@ sub regularize_details { Returns the invoice (see L) for this invoice line item. -=cut - -sub cust_bill { - my $self = shift; - qsearchs( 'cust_bill', { 'invnum' => $self->invnum } ); -} - =item previous_cust_bill_pkg Returns the previous cust_bill_pkg for this package, if any.