From 48fc9f425ec3454f4346089318994ae6c1e080a8 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Mon, 27 Jan 2014 16:52:39 -0800 Subject: localize dates that will appear on invoices, #24850 --- FS/FS/cust_bill_pkg.pm | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (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 c71ebf4..b234d6f 100644 --- a/FS/FS/cust_bill_pkg.pm +++ b/FS/FS/cust_bill_pkg.pm @@ -510,6 +510,21 @@ sub regularize_details { Returns the invoice (see L) for this invoice line item. +=item cust_main + +Returns the customer (L object) for this line item. + +=cut + +sub cust_main { + # required for cust_main_Mixin equivalence + # and use cust_bill instead of cust_pkg because this might not have a + # cust_pkg + my $self = shift; + my $cust_bill = $self->cust_bill or return ''; + $cust_bill->cust_main; +} + =item previous_cust_bill_pkg Returns the previous cust_bill_pkg for this package, if any. -- cgit v1.1