Bug 4911 Remove duplicated code
authorColin Campbell <colin.campbell@ptfs-europe.com>
Fri, 25 Jun 2010 09:46:51 +0000 (10:46 +0100)
committerGalen Charlton <gmcharlt@gmail.com>
Fri, 25 Jun 2010 17:17:12 +0000 (13:17 -0400)
Two duplicated subroutine definitions removed

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
reports/guided_reports.pl

index d519423..269f7a8 100755 (executable)
@@ -601,18 +601,6 @@ sub header_cell_loop {
     return \@headers;
 }
 
-# pass $sth, get back an array of names for the column headers
-sub header_cell_values {
-    my $sth = shift or return ();
-    return @{$sth->{NAME}};
-}
-
-# pass $sth, get back a TMPL_LOOP-able set of names for the column headers
-sub header_cell_loop {
-    my @headers = map { +{ cell => $_ } } header_cell_values (shift);
-    return \@headers;
-}
-
 foreach (1..6) {
     $template->param('build' . $_) and $template->param(buildx => $_) and last;
 }