===================================================================
RCS file: /cvs/RT/Invoicing/rt_invoices.pl,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -r1.53 -r1.54
--- RT/Invoicing/rt_invoices.pl	2015/05/07 06:26:08	1.53
+++ RT/Invoicing/rt_invoices.pl	2015/12/08 02:10:43	1.54
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $AFresh1: rt_invoices.pl,v 1.52 2015/05/07 05:23:15 andrew Exp $
+# $AFresh1: rt_invoices.pl,v 1.53 2015/05/07 05:26:08 andrew Exp $
 ########################################################################
 # Copyright (c) 2011 Andrew Fresh <andrew@afresh1.com>
 #
@@ -224,7 +224,7 @@
 }
 
 foreach my $cust ( @{$customers} ) {
-    my $invoice = $cust->{invoice};
+    my $invoice = $cust->{invoice} ||= make_invoice($cust);
     next unless $invoice && $invoice->{projects} && @{ $invoice->{projects} };
 
     $invoice->{custid}       = $cust->{id};