From 104de0640ba4ee0f89d65c9c93a97835179028c6 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Wed, 25 Mar 2009 15:25:47 -0500 Subject: [PATCH] Serial IF statements on same $variable should be ELSIFs. Small POD update also. Signed-off-by: Galen Charlton --- C4/Reports/Guided.pm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm index 0e4f41827d..df76ed5a55 100644 --- a/C4/Reports/Guided.pm +++ b/C4/Reports/Guided.pm @@ -333,7 +333,7 @@ sub get_criteria { =over -($results, $total) = execute_query($sql, $type, $offset, $limit, $format, $id) +($results, $total, $error) = execute_query($sql, $type, $offset, $limit, $format, $id) =back @@ -417,7 +417,7 @@ sub execute_query ($$$$;$$) { if ($format eq 'tab') { $string = join("\t",@$colnames); } - if ($format eq 'csv') { + elsif ($format eq 'csv') { $string = join(",",@$colnames); } my @xmlarray; @@ -433,18 +433,18 @@ sub execute_query ($$$$;$$) { my $row = join( '', @data ); $row = "$row"; $temphash{'row'} = $row; - if ( $format eq 'text' ) { + if ($format eq 'text') { $string .= "\n" . $row; } - if ($format eq 'tab' ){ + elsif ($format eq 'tab'){ $row = join("\t",@data); $string .="\n" . $row; } - if ($format eq 'csv' ){ + elsif ($format eq 'csv'){ $row = join(",",@data); $string .="\n" . $row; } - if ($format eq 'url'){ + elsif ($format eq 'url'){ my $temphash; @$temphash{@$colnames}=@data; push @xmlarray,$temphash; -- 2.39.5