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

fix [ 1266159 ] 6.7.1 - getEditForm fields are in funky order

Browse source
This commit is contained in:
JT Smith 2005-09-10 18:20:29 +00:00
parent 1a841c60f9
commit d6afcde7b9
5 changed files with 49 additions and 35 deletions
Download patch file Download diff file Expand all files Collapse all files

22
lib/WebGUI/Asset/Wobject/MessageBoard.pm
View file

@ -11,6 +11,7 @@ package WebGUI::Asset::Wobject::MessageBoard;
#-------------------------------------------------------------------
use strict;
use Tie::IxHash;
use WebGUI::Asset::Wobject;
use WebGUI::DateTime;
use WebGUI::International;
@ -25,13 +26,9 @@ our @ISA = qw(WebGUI::Asset::Wobject);
sub definition {
my $class = shift;
my $definition = shift;
push(@{$definition}, {
assetName=>WebGUI::International::get(2,"Asset_MessageBoard"),
icon=>'messageBoard.gif',
tableName=>'MessageBoard',
className=>'WebGUI::Asset::Wobject::MessageBoard',
autoGenerateForms=>1,
properties=>{
my %properties;
tie %properties, 'Tie::IxHash';
%properties = (
templateId =>{
tab=>"display",
fieldType=>"template",
@ -39,8 +36,15 @@ sub definition {
namespace=>"MessageBoard",
label=>WebGUI::International::get(73,"Asset_MessageBoard"),
hoverHelp=>WebGUI::International::get('73 description',"Asset_MessageBoard")
},
}
}
);
push(@{$definition}, {
assetName=>WebGUI::International::get(2,"Asset_MessageBoard"),
icon=>'messageBoard.gif',
tableName=>'MessageBoard',
className=>'WebGUI::Asset::Wobject::MessageBoard',
autoGenerateForms=>1,
properties=>\%properties
});
return $class->SUPER::definition($definition);
}