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

fix layout options subs

Browse source
This commit is contained in:
Doug Bell 2010-07-14 12:25:16 -05:00
parent be7208ed00
commit e56c665057
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/Asset/Wobject/Layout.pm
View file

@ -55,6 +55,7 @@ property assetsToHide => (
vertical => 1, vertical => 1,
uiLevel => 9, uiLevel => 9,
options => sub { options => sub {
my ( $self ) = @_;
my @assetsToHide = split("\n",$self->assetsToHide); my @assetsToHide = split("\n",$self->assetsToHide);
my $children = $self->getLineage(["children"],{"returnObjects"=>1, excludeClasses=>["WebGUI::Asset::Wobject::Layout"]}); my $children = $self->getLineage(["children"],{"returnObjects"=>1, excludeClasses=>["WebGUI::Asset::Wobject::Layout"]});
my %childIds; my %childIds;
@ -71,6 +72,8 @@ property assetOrder => (
label => ['asset order label', 'Asset_Layout'], label => ['asset order label', 'Asset_Layout'],
hoverHelp => ['asset order hoverHelp', 'Asset_Layout'], hoverHelp => ['asset order hoverHelp', 'Asset_Layout'],
options => sub { options => sub {
my ( $self ) = @_;
my $i18n = WebGUI::International->new( $self->session, 'Asset_Layout' );
tie my %assetOrder, "Tie::IxHash", ( tie my %assetOrder, "Tie::IxHash", (
"asc" => $i18n->get("asset order asc"), "asc" => $i18n->get("asset order asc"),
"desc" => $i18n->get("asset order desc"), "desc" => $i18n->get("asset order desc"),