comparison Lib/IMPL/Web/View/TTFactory.pm @ 339:97628101b765

refactoring: application now holds a security object factory rather than a security object
author cin
date Wed, 19 Jun 2013 03:25:44 +0400
parents c78dfbe658bd
children 9bdccdf1f50b
comparison
equal deleted inserted replaced
338:c78dfbe658bd 339:97628101b765
132 132
133 my %labels; 133 my %labels;
134 $labels{default} = IMPL::Resources::Strings::ParseStringsMap("$flabels"); 134 $labels{default} = IMPL::Resources::Strings::ParseStringsMap("$flabels");
135 135
136 while(my($label,$text) = each %{$labels{default}}) { 136 while(my($label,$text) = each %{$labels{default}}) {
137 warn "LABEL: $label";
138 $vars{$label} = sub { 137 $vars{$label} = sub {
139 my ($params) = @_; 138 my ($params) = @_;
140 my $locale = Resources->currentLocale; 139 my $locale = Resources->currentLocale;
141 140
142 unless ($labels{$locale}) { 141 unless ($labels{$locale}) {