Bug 8379 removing another useless ->disconnect line

and s/tab/spaces/

Signed-off-by: Dobrica Pavlinusic <dpavlin@rot13.org>
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
This commit is contained in:
Paul Poulain 2012-09-24 22:55:45 +02:00 committed by Chris Cormack
parent 58827fb4fb
commit bcc6d4b3c2
1 changed files with 6 additions and 7 deletions

View File

@ -53,13 +53,12 @@ sub StringSearch {
$sth->execute;
}
my @results;
while (my $data=$sth->fetchrow_hashref) {
push(@results,$data);
}
$sth->finish;
$dbh->disconnect;
return (scalar(@results),\@results);
my @results;
while (my $data=$sth->fetchrow_hashref) {
push(@results,$data);
}
$sth->finish;
return (scalar(@results),\@results);
}
my $input = new CGI;