a bunch of bug fixes and tweaks related to workflow/versioning

This commit is contained in:
JT Smith 2006-03-23 16:56:08 +00:00
parent f73b2996da
commit 985417afd3
9 changed files with 38 additions and 9 deletions

View file

@ -106,8 +106,9 @@ sub process {
icon=>$session->config->get("extrasURL").'/adminConsole/small/versionTags.gif'
});
}
my $rs = $session->db->read("select tagId, name from assetVersionTag where isCommitted=0 and isLocked=0 order by name");
while (my ($id, $name) = $rs->array) {
my $rs = $session->db->read("select tagId, name, groupToUse from assetVersionTag where isCommitted=0 and isLocked=0 order by name");
while (my ($id, $name, $group) = $rs->array) {
next unless $session->user->isInGroup($group);
push(@tags, {
url=>$session->url->page("op=setWorkingVersionTag;backToSite=1;tagId=".$id),
title=>($id eq $workingId) ? '<span style="color: #000080;">* '.$name.'</span>' : $name,