first part of coding

This commit is contained in:
David Delikat 2009-02-27 03:37:55 +00:00
parent fc21af73d2
commit 15a2cbd840
5 changed files with 408 additions and 2 deletions

View file

@ -82,6 +82,7 @@ Deletes this ad.
sub delete {
my $self = shift;
my $storage = WebGUI::Storage->get($self->session, $self->get("storageId"));
# dav TODO update WebGUI::AssetColateral::Sku::Ad::Ad set delete flag for this AdId
$storage->delete if defined $storage;
$self->session->db->deleteRow("advertisement","adId",$self->getId);
$self = undef;