addding test for Template

fixed more session bugs
This commit is contained in:
JT Smith 2006-01-17 03:57:18 +00:00
parent 610e0486de
commit 80a5518717
4 changed files with 45 additions and 7 deletions

View file

@ -1290,7 +1290,7 @@ Purges all cache entries associated with this asset.
sub purgeCache {
my $self = shift;
my $stow = $self->stow;
my $stow = $self->session->stow;
$stow->delete('assetLineage');
$stow->delete('assetClass');
$stow->delete('assetRevision');

View file

@ -61,7 +61,7 @@ sub addRevision {
$self->session->db->write("insert into assetData (assetId, revisionDate, revisedBy, tagId, status, url, startDate, endDate,
ownerUserId, groupIdEdit, groupIdView) values (".$self->session->db->quote($self->getId).",".$now.", ".$self->session->db->quote($self->session->user->userId).",
".$self->session->db->quote($versionTag).", ".$self->session->db->quote($status).", ".$self->session->db->quote($self->getId).", 997995720, 32472169200,'3','3','7')");
foreach my $definition (@{$self->definition}) {
foreach my $definition (@{$self->definition($self->session)}) {
unless ($definition->{tableName} eq "assetData") {
$self->session->db->write("insert into ".$definition->{tableName}." (assetId,revisionDate) values (".$self->session->db->quote($self->getId).",".$now.")");
}