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

speed up i18n calls

Browse source
This commit is contained in:
Graham Knop 2008-11-24 04:00:55 +00:00
parent d9c1f88eab
commit a922eca6bb
1 changed files with 15 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

26
lib/WebGUI/International.pm
View file

@ -97,21 +97,25 @@ sub get {
$language =~ s/$safeRe//g; $language =~ s/$safeRe//g;
$namespace =~ s/$safeRe//g; $namespace =~ s/$safeRe//g;
my $cmd = "WebGUI::i18n::".$language."::".$namespace; my $cmd = "WebGUI::i18n::".$language."::".$namespace;
eval { WebGUI::Pluggable::load($cmd); };
if ($@) {
if ($language eq 'English') {
$session->log->error("Unable to load $cmd");
return '';
}
else {
my $output = $self->get($id, $namespace, 'English');
return $output;
}
}
my $table = do { my $table = do {
no strict 'refs'; no strict 'refs';
${"$cmd\::I18N"}; ${"$cmd\::I18N"};
}; };
if (! $table) {
eval { WebGUI::Pluggable::load($cmd); };
if ($@) {
if ($language eq 'English') {
$session->log->error("Unable to load $cmd");
return '';
}
else {
my $output = $self->get($id, $namespace, 'English');
return $output;
}
}
no strict 'refs';
$table = ${"$cmd\::I18N"};
}
my $output = $table->{$id}->{message}; my $output = $table->{$id}->{message};
$output = $self->get($id, $namespace, "English") $output = $self->get($id, $namespace, "English")
if ($output eq "" && $language ne "English"); if ($output eq "" && $language ne "English");