fixed require statement
git-svn-id: http://yolanda.mister-muffin.de/svn@8 7eef14d0-6ed0-489d-bf55-20463b2d70db
This commit is contained in:
parent
c700555ef8
commit
ab07f7baad
1 changed files with 2 additions and 2 deletions
|
@ -1,3 +1,5 @@
|
||||||
|
require "/var/www/perl/include.pl";
|
||||||
|
|
||||||
sub fill_tagcloud {
|
sub fill_tagcloud {
|
||||||
my $sth = $dbh->prepare(qq{select text, count from tagcloud });
|
my $sth = $dbh->prepare(qq{select text, count from tagcloud });
|
||||||
$sth->execute();
|
$sth->execute();
|
||||||
|
@ -8,5 +10,3 @@ sub fill_tagcloud {
|
||||||
$sth->finish();
|
$sth->finish();
|
||||||
$dbh->disconnect();
|
$dbh->disconnect();
|
||||||
}
|
}
|
||||||
|
|
||||||
1;
|
|
||||||
|
|
Loading…
Reference in a new issue