fixed: Deleting Ticket from Event Management System Asset

This commit is contained in:
Yung Han Khoe 2008-07-12 19:02:00 +00:00
parent 60bb354a78
commit 939b5b4897
5 changed files with 24 additions and 10 deletions

View file

@ -17,7 +17,7 @@ package WebGUI::Asset::Sku::EMSToken;
use strict;
use Tie::IxHash;
use base 'WebGUI::Asset::Sku';
use WebGUI::Utility;
=head1 NAME
@ -229,8 +229,12 @@ Override to return to appropriate page.
sub www_delete {
my ($self) = @_;
$self->SUPER::www_delete;
return $self->getParent->www_buildBadge(undef,'tokens');
return $self->session->privilege->insufficient() unless ($self->canEdit && $self->canEditIfLocked);
return $self->session->privilege->vitalComponent() if $self->get('isSystem');
return $self->session->privilege->vitalComponent() if (isIn($self->getId,
$self->session->setting->get("defaultPage"), $self->session->setting->get("notFoundPage")));
$self->trash;
return $self->getParent->www_buildBadge(undef,'tokens');
}