From 32072dbf59a054529f5304574c0f56f9567d14d0 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Sat, 28 Dec 2013 16:11:46 -0800 Subject: autoload methods returning foreign records, RT#13971 --- FS/FS/cust_bill_pkg.pm | 8 -------- 1 file changed, 8 deletions(-) (limited to 'FS/FS/cust_bill_pkg.pm') diff --git a/FS/FS/cust_bill_pkg.pm b/FS/FS/cust_bill_pkg.pm index f94bf9b..c71ebf4 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. -- cgit v1.1