fix for bug 1171569, which really applied to almost every Asset and Wobject in the system

This commit is contained in:
Colin Kuskie 2005-03-28 05:15:48 +00:00
parent 354c99c03f
commit 1b0aa2174d
21 changed files with 23 additions and 16 deletions

View file

@ -217,7 +217,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("article add/edit");
$self->getAdminConsole->setHelp("article add/edit","Article");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("12","Article"));
}

View file

@ -672,7 +672,7 @@ sub www_deleteTabConfirm {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("data form add/edit");
$self->getAdminConsole->setHelp("data form add/edit","DataForm");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("7","DataForm"));
}

View file

@ -528,7 +528,7 @@ sub www_addStyledEvent {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("events calendar add/edit");
$self->getAdminConsole->setHelp("events calendar add/edit","EventsCalendar");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("12","EventsCalendar"));
}

View file

@ -180,6 +180,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("folder add/edit","Folder");
return $self->getAdminConsole->render($self->getEditForm->print,"Edit Folder");
}

View file

@ -345,7 +345,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("http proxy add/edit");
$self->getAdminConsole->setHelp("http proxy add/edit","HttpProxy");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("2","HttpProxy"));
}

View file

@ -200,6 +200,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("layout add/edit", "Layout");
return $self->getAdminConsole->render($self->getEditForm->print,"Edit Layout");
}

View file

@ -128,7 +128,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("message board add/edit");
$self->getAdminConsole->setHelp("message board add/edit","MessageBoard");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("6","MessageBoard"));
}

View file

@ -391,7 +391,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("navigation add/edit");
$self->getAdminConsole->setHelp("navigation add/edit","Navigation");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("22","Navigation"));
}

View file

@ -354,7 +354,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("poll add/edit");
$self->getAdminConsole->setHelp("poll add/edit","Poll");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("9","Poll"));
}

View file

@ -453,7 +453,7 @@ sub www_deleteSpecificationConfirm {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("product add/edit");
$self->getAdminConsole->setHelp("product add/edit","Product");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("6","Product"));
}

View file

@ -266,7 +266,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("sql report add/edit");
$self->getAdminConsole->setHelp("sql report add/edit", "SQLReport");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("8","SQLReport"));
}

View file

@ -667,7 +667,7 @@ sub www_deleteAllResponsesConfirm {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("survey add/edit");
$self->getAdminConsole->setHelp("survey add/edit","Survey");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get(2,'Survey'));
}
@ -736,7 +736,7 @@ sub www_editAnswer {
}
$f->submit;
# $self->getAdminConsole->setHelp("survey add/edit");
# $self->getAdminConsole->setHelp("answer add/edit","Survey");
return $self->getAdminConsole->render($f->print, WebGUI::International::get(18,'Survey'));
}
@ -842,7 +842,7 @@ sub www_editQuestion {
$sth->finish;
}
# $self->getAdminConsole->setHelp("survey add/edit");
$self->getAdminConsole->setHelp("question add/edit","Survey");
return $self->getAdminConsole->render($f->print, WebGUI::International::get(17,'Survey'));
}

View file

@ -390,7 +390,7 @@ sub view {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("syndicated content add/edit");
$self->getAdminConsole->setHelp("syndicated content add/edit","SyndicatedContent");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("4","SyndicatedContent"));
}

View file

@ -252,7 +252,7 @@ sub getEditForm {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("web services client add/edit");
$self->getAdminConsole->setHelp("web services client add/edit","WSClient");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get("20","WSClient"));
}