Removed unncessary new method from all wobjects. Moved www_copy www_deleteMessage www_deleteMessageConfirm to Wobject superclass.

This commit is contained in:
JT Smith 2002-09-29 22:54:10 +00:00
parent bede362a30
commit 42227f1194
17 changed files with 53 additions and 359 deletions

View file

@ -218,15 +218,6 @@ sub duplicate {
$sth->finish;
}
#-------------------------------------------------------------------
sub new {
my ($self, $class, $property);
$class = shift;
$property = shift;
$self = WebGUI::Wobject->new($property);
bless $self, $class;
}
#-------------------------------------------------------------------
sub purge {
WebGUI::SQL->write("delete from UserSubmission_submission where wobjectId=".$_[0]->get("wobjectId"));
@ -265,16 +256,6 @@ sub www_approveSubmission {
}
}
#-------------------------------------------------------------------
sub www_copy {
if (WebGUI::Privilege::canEditPage()) {
$_[0]->duplicate;
return "";
} else {
return WebGUI::Privilege::insufficient();
}
}
#-------------------------------------------------------------------
sub www_deleteAttachment {
my ($owner);
@ -299,24 +280,6 @@ sub www_deleteImage {
}
}
#-------------------------------------------------------------------
sub www_deleteMessage {
if (WebGUI::Discussion::canEditMessage($_[0],$session{form}{mid})) {
return WebGUI::Discussion::deleteMessage();
} else {
return WebGUI::Privilege::insufficient();
}
}
#-------------------------------------------------------------------
sub www_deleteMessageConfirm {
if (WebGUI::Discussion::canEditMessage($_[0],$session{form}{mid})) {
return WebGUI::Discussion::deleteMessageConfirm();
} else {
return WebGUI::Privilege::insufficient();
}
}
#-------------------------------------------------------------------
sub www_deleteSubmission {
my ($output, $owner);