more session related bug fixes

This commit is contained in:
JT Smith 2006-01-17 05:36:56 +00:00
parent c5cf903b45
commit 3fd57a3559
2 changed files with 2 additions and 2 deletions

View file

@ -98,7 +98,7 @@ sub purge {
my $self = shift;
return undef if ($self->getId eq $self->session->setting->get("defaultPage") || $self->getId eq $self->session->setting->get("notFoundPage"));
$self->session->db->beginTransaction;
foreach my $definition (@{$self->definition}) {
foreach my $definition (@{$self->definition($self->session)}) {
$self->session->db->write("delete from ".$definition->{tableName}." where assetId=".$self->session->db->quote($self->getId));
}
$self->session->db->write("delete from metaData_values where assetId = ".$self->session->db->quote($self->getId));

View file

@ -36,7 +36,7 @@ $output = $template->process(\%var);
ok($output =~ m/AAAAA/, "process() - variables");
ok($output =~ m/true/, "process() - conditionals");
ok($output =~ m/XYXYXYXYXY/, "process() - loops");
$template->purge;
cleanup($session); # this line is required