convert File, Wobject and Redirect to use addEditLabel

This commit is contained in:
Colin Kuskie 2007-07-21 04:24:56 +00:00
parent 7018d38f15
commit f1efe0d160
3 changed files with 3 additions and 6 deletions

View file

@ -425,8 +425,7 @@ sub www_edit {
-namespace=>"FileAsset"
);
$self->getAdminConsole->setHelp("file add/edit", "Asset_File");
my $addEdit = ($self->session->form->process("func") eq 'add') ? $i18n->get('add','Asset_Wobject') : $i18n->get('edit','Asset_Wobject');
return $self->getAdminConsole->render($tabform->print,$addEdit.' '.$self->getName);
return $self->getAdminConsole->render($tabform->print,$self->addEditLabel);
}
#-------------------------------------------------------------------

View file

@ -86,9 +86,7 @@ sub www_edit {
return $self->session->privilege->insufficient() unless $self->canEdit;
return $self->session->privilege->locked() unless $self->canEditIfLocked;
$self->getAdminConsole->setHelp("redirect add/edit", "Asset_Redirect");
my $i18n = WebGUI::International->new($self->session, 'Asset_Wobject');
my $addEdit = ($self->session->form->process("func") eq 'add') ? $i18n->get('add') : $i18n->get('edit');
return $self->getAdminConsole->render($self->getEditForm->print,$addEdit.' '.$self->getName);
return $self->getAdminConsole->render($self->getEditForm->print, $self->addEditLabel);
}
#-------------------------------------------------------------------

View file

@ -493,7 +493,7 @@ sub www_edit {
$tag =~ s/([a-z])([A-Z])/$1 $2/g; #Separate studly caps
$tag =~ s/([A-Z]+(?![a-z]))/$1 /g; #Separate acronyms
$self->getAdminConsole->setHelp(lc($tag)." add/edit", "Asset_".$tag2);
return $self->getAdminConsole->render($self->getEditForm->print,$self->addEditLabel);
return $self->getAdminConsole->render($self->getEditForm->print, $self->addEditLabel);
}