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

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

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Asset/Event.pm
View file

@ -457,7 +457,7 @@ sub www_deleteEventConfirm {
sub www_edit {
my $self = shift;
return WebGUI::Privilege::insufficient() unless $self->canEdit;
$self->getAdminConsole->setHelp("event add/edit");
$self->getAdminConsole->setHelp("event add/edit","EventsCalendar");
return $self->getAdminConsole->render($self->getEditForm->print,WebGUI::International::get('13', 'EventsCalendar'));
}

1
lib/WebGUI/Asset/File.pm
View file

@ -259,6 +259,7 @@ sub www_edit {
-value=>$self->getValue("templateId"),
-namespace=>"FileAsset"
);
$self->getAdminConsole->setHelp("file add/edit", "File");
return $self->getAdminConsole->render($tabform->print,"Edit File");
}

1
lib/WebGUI/Asset/File/Image.pm
View file

@ -231,6 +231,7 @@ sub www_edit {
-namespace=>"ImageAsset",
-defaultValue=>"PBtmpl0000000000000088"
);
$self->getAdminConsole->setHelp("image add/edit","Image");
return $self->getAdminConsole->render($tabform->print,WebGUI::International::get("edit image","Image"));
}

1
lib/WebGUI/Asset/FilePile.pm
View file

@ -136,6 +136,7 @@ sub edit {
-label=>WebGUI::International::get("upload files", "FilePile"),
-value=>$self->getUploadControl
);
$self->getAdminConsole->setHelp("file pile add/edit","FilePile");
return $self->getAdminConsole->render($tabform->print,WebGUI::International::get("add pile", "FilePile"));
}

1
lib/WebGUI/Asset/Redirect.pm
View file

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

1
lib/WebGUI/Asset/Snippet.pm
View file

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

2
lib/WebGUI/Asset/Template.pm
View file

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

2
lib/WebGUI/Asset/Wobject/Article.pm
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"));
}

2
lib/WebGUI/Asset/Wobject/DataForm.pm
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"));
}

2
lib/WebGUI/Asset/Wobject/EventsCalendar.pm
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"));
}

1
lib/WebGUI/Asset/Wobject/Folder.pm
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");
}

2
lib/WebGUI/Asset/Wobject/HttpProxy.pm
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"));
}

1
lib/WebGUI/Asset/Wobject/Layout.pm
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");
}

2
lib/WebGUI/Asset/Wobject/MessageBoard.pm
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"));
}

2
lib/WebGUI/Asset/Wobject/Navigation.pm
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"));
}

2
lib/WebGUI/Asset/Wobject/Poll.pm
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"));
}

2
lib/WebGUI/Asset/Wobject/Product.pm
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"));
}

2
lib/WebGUI/Asset/Wobject/SQLReport.pm
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"));
}

6
lib/WebGUI/Asset/Wobject/Survey.pm
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'));
}

2
lib/WebGUI/Asset/Wobject/SyndicatedContent.pm
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"));
}

2
lib/WebGUI/Asset/Wobject/WSClient.pm
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"));
}