converted cs to use workflow engine for moderation

This commit is contained in:
JT Smith 2006-03-30 03:52:18 +00:00
parent fe8dd69731
commit 299dd5aa09
13 changed files with 154 additions and 221 deletions

View file

@ -119,6 +119,20 @@ sub get {
#-------------------------------------------------------------------
=head2 getAssetCount ( )
Returns the number of assets that are under this tag.
=cut
sub getAssetCount {
my $self = shift;
my ($count) = $self->session->db->quickArray("select count(distinct(assetId)) from assetData where tagId=?", [$self->getId]);
return $count;
}
#-------------------------------------------------------------------
=head2 getAssets ( )
Returns a list of asset objects that are part of this version tag.
@ -150,6 +164,20 @@ sub getId {
#-------------------------------------------------------------------
=head2 getRevisionCount ( )
Returns the number of revisions that are under this tag.
=cut
sub getRevisionCount {
my $self = shift;
my ($count) = $self->session->db->quickArray("select count(assetId) from assetData where tagId=?", [$self->getId]);
return $count;
}
#-------------------------------------------------------------------
=head2 getWorkflowInstance ( )
Returns a reference to the workflow instance attached to this version tag if any.