===================================================================
RCS file: /cvs/RT/Invoicing/rt_invoices.pl,v
retrieving revision 1.48
retrieving revision 1.49
diff -u -r1.48 -r1.49
--- RT/Invoicing/rt_invoices.pl	2012/11/28 02:23:34	1.48
+++ RT/Invoicing/rt_invoices.pl	2013/02/05 03:41:58	1.49
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $AFresh1: rt_invoices.pl,v 1.47 2012/01/31 04:36:28 andrew Exp $
+# $AFresh1: rt_invoices.pl,v 1.48 2012/11/28 02:23:34 andrew Exp $
 ########################################################################
 # Copyright (c) 2011 Andrew Fresh <andrew@afresh1.com>
 #
@@ -202,6 +202,7 @@
 
         next unless $cust;
         next unless $cust->{invoice};
+        next unless $credits->{$custid} < 0;
 
         $cust->{invoice}->{credit} = $credits->{$custid};