From e56c6650575ee063d0aad905d477146328ea27a4 Mon Sep 17 00:00:00 2001 From: Doug Bell Date: Wed, 14 Jul 2010 12:25:16 -0500 Subject: [PATCH] fix layout options subs --- lib/WebGUI/Asset/Wobject/Layout.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lib/WebGUI/Asset/Wobject/Layout.pm b/lib/WebGUI/Asset/Wobject/Layout.pm index f81ba5ef0..cbc4b3e5c 100644 --- a/lib/WebGUI/Asset/Wobject/Layout.pm +++ b/lib/WebGUI/Asset/Wobject/Layout.pm @@ -55,6 +55,7 @@ property assetsToHide => ( vertical => 1, uiLevel => 9, options => sub { + my ( $self ) = @_; my @assetsToHide = split("\n",$self->assetsToHide); my $children = $self->getLineage(["children"],{"returnObjects"=>1, excludeClasses=>["WebGUI::Asset::Wobject::Layout"]}); my %childIds; @@ -71,6 +72,8 @@ property assetOrder => ( label => ['asset order label', 'Asset_Layout'], hoverHelp => ['asset order hoverHelp', 'Asset_Layout'], options => sub { + my ( $self ) = @_; + my $i18n = WebGUI::International->new( $self->session, 'Asset_Layout' ); tie my %assetOrder, "Tie::IxHash", ( "asc" => $i18n->get("asset order asc"), "desc" => $i18n->get("asset order desc"),