===================================================================
RCS file: /cvs/RT/Invoicing/rt_invoices.pl,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -r1.25 -r1.26
--- RT/Invoicing/rt_invoices.pl	2011/04/19 04:18:13	1.25
+++ RT/Invoicing/rt_invoices.pl	2011/04/19 04:19:27	1.26
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $AFresh1: rt_invoices.pl,v 1.24 2011/04/12 19:32:15 andrew Exp $
+# $AFresh1: rt_invoices.pl,v 1.25 2011/04/19 03:18:13 andrew Exp $
 ########################################################################
 # Copyright (c) 2011 Andrew Fresh <andrew@afresh1.com>
 #
@@ -76,6 +76,11 @@
 
 my $iterator = $results->get_iterator;
 while ( my $ticket = &$iterator ) {
+    if (!$ticket->time_worked) {
+        say "Ticket " . $ticket->id . " has no time worked";
+        next;
+    }
+
     my $cust = find_customer_for_ticket( $ticket );
     if ( !$cust ) {
         warn "No customer found for ticket " . $ticket->id;