hadn't been brought up to spec

This commit is contained in:
JT Smith 2007-06-13 15:16:45 +00:00
parent ee4f857d59
commit c0cba2a467

View file

@ -32,7 +32,7 @@ sub definition {
my $class = shift; my $class = shift;
my $session = shift; my $session = shift;
my $definition = shift; my $definition = shift;
my $i18n = WebGUI::International->new($session, 'NewWobject'); my $i18n = WebGUI::International->new($session, 'Asset_NewWobject');
my %properties; my %properties;
tie %properties, 'Tie::IxHash'; tie %properties, 'Tie::IxHash';
%properties = ( %properties = (
@ -101,7 +101,7 @@ sub getEditForm {
$tabform->getTab("display")->template( $tabform->getTab("display")->template(
-value=>$self->getValue("templateId"), -value=>$self->getValue("templateId"),
-label=>WebGUI::International::get("template_label","NewWobject"), -label=>WebGUI::International::get("template_label","Asset_NewWobject"),
-namespace=>"NewWobject" -namespace=>"NewWobject"
); );
@ -177,11 +177,11 @@ adminConsole views.
#sub www_edit { #sub www_edit {
# my $self = shift; # my $self = shift;
# return WebGUI::Privilege::insufficient() unless $self->canEdit; # return $self->session->privilege->insufficient() unless $self->canEdit;
# return WebGUI::Privilege::locked() unless $self->canEditIfLocked; # return $self->session->privilege->locked() unless $self->canEditIfLocked;
# $self->getAdminConsole->setHelp("new wobject add/edit", "NewWobject"); # my $i18n = WebGUI::International->new($self->session, "Asset_NewWobject");
# return $self->getAdminConsole->render($self->getEditForm->print, # $self->getAdminConsole->setHelp("new wobject add/edit", "Asset_NewWobject");
# WebGUI::International::get("edit_title","NewWobject")); # return $self->getAdminConsole->render($self->getEditForm->print, $i18n->get("edit title"));
#} #}