- All assets now have an autoGenerateForms property just like wobjects per the

rough edges discussions in Community IRC.
 - fix: not set UTF-8 in setup page
This commit is contained in:
JT Smith 2006-05-31 23:01:53 +00:00
parent 2f3ae0faef
commit 33272fd76c
6 changed files with 51 additions and 140 deletions

View file

@ -62,11 +62,15 @@ sub definition {
push(@{$definition}, {
assetName=>$i18n->get('assetName'),
uiLevel => 9,
autoGenerateForms=>1,
icon=>'redirect.gif',
tableName=>'redirect',
className=>'WebGUI::Asset::Redirect',
properties=>{
redirectUrl=>{
tab=>"properties",
label=>$i18n->get('redirect url'),
hoverHelp=>$i18n->get('redirect url description'),
fieldType=>'url',
defaultValue=>undef
}
@ -76,29 +80,6 @@ sub definition {
}
#-------------------------------------------------------------------
=head2 getEditForm ()
Returns the TabForm object that will be used in generating the edit page for this asset.
=cut
sub getEditForm {
my $self = shift;
my $tabform = $self->SUPER::getEditForm();
my $i18n = WebGUI::International->new($self->session, 'Asset_Redirect');
$tabform->getTab("properties")->url(
-name=>"redirectUrl",
-label=>$i18n->get('redirect url'),
-hoverHelp=>$i18n->get('redirect url description'),
-value=>$self->getValue("redirectUrl")
);
return $tabform;
}
#-------------------------------------------------------------------
sub www_edit {
my $self = shift;