From eb398cbbbcdfc6082ca2e85198e56769c86d7af9 Mon Sep 17 00:00:00 2001
From: Graham Knop <graham@plainblack.com>
Date: Mon, 3 Sep 2007 20:03:51 +0000
Subject: [PATCH] clicking active version tag on admin bar opens tag for
 editing

---
 docs/changelog/7.x.x.txt     | 1 +
 lib/WebGUI/Macro/AdminBar.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index 8bc650168..146873b9a 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -5,6 +5,7 @@
  - All toolbar icons now have a class called "toolbarIcon" so they can be
    styled by external CSS.
  - Profile fields and categories and have confirmation boxes when deleting using the side menu
+ - Clicking active version tag in sidebar opens up version tag edit screen
 
 7.4.5
  - fix: Apostrophy incorrectly escaped as double quote in some places
diff --git a/lib/WebGUI/Macro/AdminBar.pm b/lib/WebGUI/Macro/AdminBar.pm
index ff08535c5..02b657a29 100644
--- a/lib/WebGUI/Macro/AdminBar.pm
+++ b/lib/WebGUI/Macro/AdminBar.pm
@@ -119,7 +119,7 @@ sub process {
 	foreach my $tag (@{WebGUI::VersionTag->getOpenTags($session)}) {
 		next unless $session->user->isInGroup($tag->get("groupToUse"));
 		push(@tags, {
-			url=>$session->url->page("op=setWorkingVersionTag;backToSite=1;tagId=".$tag->getId),
+			url=>$session->url->page("op=" . ($tag->getId eq $workingId ? "editVersionTag" : "setWorkingVersionTag") . ";backToSite=1;tagId=".$tag->getId),
 			title=>($tag->getId eq $workingId) ?  '<span style="color: #000080;">* '.$tag->get("name").'</span>' : $tag->get("name"),
 			icon=>$session->url->extras('spacer.gif')
 			});