some more fixes.

This commit is contained in:
Matthew Wilson 2006-01-21 02:35:13 +00:00
parent 3d740cdfac
commit 81a26c6d18

View file

@ -330,7 +330,7 @@ sub processReplacements {
$content =~ s/\Q$searchFor/$replaceWith/gs;
}
} else {
my $sth = $session->db->read("select searchFor,replaceWith from replacements",$session->dbSlave);
my $sth = $session->dbSlave->read("select searchFor,replaceWith from replacements");
while (my ($searchFor,$replaceWith) = $sth->array) {
$replacements->{$searchFor} = $replaceWith;
$content =~ s/\Q$searchFor/$replaceWith/gs;