patch from Steve Callendar to protect against report output failure when trying to...

git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_6@15084 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/reporter/clark-kent.pl b/Open-ILS/src/reporter/clark-kent.pl
index 5e87cb2..45d43ec 100755 (executable)
--- a/Open-ILS/src/reporter/clark-kent.pl
+++ b/Open-ILS/src/reporter/clark-kent.pl
@@ -782,6 +782,8 @@ sub draw_lines {
                
        }
 
+       return [] unless ($new_data[0] && @{$new_data[0]});
+
        for my $col (@use_me) {
                push @leg, $r->{column_labels}->[$values[$col - 1]];
        }