Make creating a Storage object with a short ID an error.

Add a test to check for that.
Beginning of documentation for VersionTag.
This commit is contained in:
Colin Kuskie 2006-05-24 03:03:47 +00:00
parent e6ef875b51
commit b02386064d
5 changed files with 83 additions and 6 deletions

View file

@ -337,7 +337,7 @@ sub www_manageVersions {
return $session->privilege->insufficient() unless ($session->user->isInGroup(12));
my $ac = WebGUI::AdminConsole->new($session,"versions");
my $i18n = WebGUI::International->new($session,"VersionTag");
$ac->setHelp("versions manage");
$ac->setHelp("versions manage", "VersionTag");
$ac->addSubmenuItem($session->url->page('op=editVersionTag'), $i18n->get("add a version tag"));
$ac->addSubmenuItem($session->url->page('op=managePendingVersions'), $i18n->get("manage pending versions")) if ($session->user->isInGroup(3));
$ac->addSubmenuItem($session->url->page('op=manageCommittedVersions'), $i18n->get("manage committed versions")) if ($session->user->isInGroup(3));