Die if we can't find a week we're looking for.

davorg · Dec 17, 2017 · f9a4513 · f9a4513
1 parent 04ab09d
commit f9a4513
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/bin/new_invoice b/bin/new_invoice
@@ -40,6 +40,7 @@ my $week_rs = $sch->resultset('Week');
 
 foreach (@weeks) {
   my $wk = $week_rs->find($_);
+  die "Can't find week [$_]\n" unless $wk;
 
   unless ($wk->contract->customer->id == $contract->customer->id) {
     warn 'Week ' . $wk->id . ' has no work for ' .