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

- Added a better confirmation message when deleting content.

Browse source 
- Added a "commit" option as well as a listing of version tags per the rough
   edges discussions on IRC.
 - Added a "close" or "archive" option to replies.
This commit is contained in:
JT Smith 2006-06-10 20:49:11 +00:00
parent 58566a6ed6
commit 9aa86225be
9 changed files with 413 additions and 371 deletions
Download patch file Download diff file Expand all files Collapse all files

22
lib/WebGUI/AdminConsole.pm
View file

@ -450,6 +450,28 @@ sub render {
$var{"console.canUse"} = $acParams->{canUse};
$var{"console.icon"} = $acParams->{icon};
$var{"help.url"} = $self->{_helpUrl};
my $working = WebGUI::VersionTag->getWorking($self->session, 1);
my $workingId = "";
my @tags = ();
if ($working) {
$workingId = $working->getId;
push(@tags, {
url=>$self->session->url->page("op=commitVersionTag;tagId=".$workingId),
title=>$i18n->get("commit my changes","Macro_AdminBar"),
icon=>$self->session->url->extras('adminConsole/small/versionTags.gif')
});
}
my $rs = $self->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 $self->session->user->isInGroup($group);
push(@tags, {
url=>$self->session->url->page("op=setWorkingVersionTag;tagId=".$id),
title=>($id eq $workingId) ? '* '.$name : $name,
});
}
if (scalar(@tags)) {
$var{versionTags} = \@tags;
}
if (defined $self->session->asset) {
my $importNode = WebGUI::Asset->getImportNode($self->session);
my $importNodeLineage = $importNode->get("lineage");