oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added manual thread archive/unarchive options

Browse source
This commit is contained in:
JT Smith 2006-02-26 20:31:46 +00:00
parent 357794959a
commit 5fe11ed251
6 changed files with 137 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

19
lib/WebGUI/Asset/Post.pm
View file

@ -689,6 +689,7 @@ sub processPropertiesFromFormPost {
$self->getThread->lock if ($self->session->form->process('lock'));
$self->getThread->stick if ($self->session->form->process("stick"));
}
$self->getThread->unarchive if ($self->getThread->get("status") eq "archived");
}
$data{groupIdView} =$self->getThread->getParent->get("groupIdView");
$data{groupIdEdit} = $self->getThread->getParent->get("groupIdEdit");
@ -828,14 +829,14 @@ sub setStatusApproved {
=head2 setStatusArchived ( )
Sets the status of this post to archived.
Sets the status of this post to archived. This will only happen if the post status is approved.
=cut
sub setStatusArchived {
my ($self) = @_;
$self->update({status=>'archived'});
$self->update({status=>'archived'}) if ($self->get("status") eq "approved");
}
@ -873,6 +874,20 @@ sub setStatusPending {
}
#-------------------------------------------------------------------
=head2 setStatusUnarchived ( )
Sets the status of this post to approved, but does so without any of the normal notifications and other stuff.
=cut
sub setStatusUnarchived {
my ($self) = @_;
$self->update({status=>'approved'}) if ($self->get("status") eq "archived");
}
#-------------------------------------------------------------------
=head2 trash