[Rt-commit] r5037 - in rt/branches/3.7-EXPERIMENTAL: .
ruz at bestpractical.com
ruz at bestpractical.com
Mon Apr 17 09:02:13 EDT 2006
Author: ruz
Date: Mon Apr 17 09:02:11 2006
New Revision: 5037
Modified:
rt/branches/3.7-EXPERIMENTAL/ (props changed)
rt/branches/3.7-EXPERIMENTAL/lib/RT/I18N.pm
Log:
r2385 at cubic-pc: cubic | 2006-04-17 14:49:26 +0400
* comment and untabify
Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/I18N.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/I18N.pm (original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/I18N.pm Mon Apr 17 09:02:11 2006
@@ -101,13 +101,16 @@
sub Init {
require File::Glob;
+ # XXX: why do we load all language functions
+ # whne we are going to use only several languages? //ruz
+
# Load language-specific functions
foreach my $language ( File::Glob::bsd_glob(substr(__FILE__, 0, -3) . "/*.pm")) {
if ($language =~ /^([-\w\s.\/\\~:]+)$/) {
require $1;
}
else {
- warn("$language is tainted. not loading");
+ warn("$language is tainted. not loading");
}
}
@@ -116,13 +119,14 @@
# Acquire all .po files and iterate them into lexicons
Locale::Maketext::Lexicon->import({
- _decode => 1, map {
- $_ => [
- Gettext => (substr(__FILE__, 0, -3) . "/$_.po"),
- Gettext => "$RT::LocalLexiconPath/*/$_.po",
- Gettext => "$RT::LocalLexiconPath/$_.po",
- ],
- } @lang
+ _decode => 1,
+ map {
+ $_ => [
+ Gettext => (substr(__FILE__, 0, -3) . "/$_.po"),
+ Gettext => "$RT::LocalLexiconPath/*/$_.po",
+ Gettext => "$RT::LocalLexiconPath/$_.po",
+ ],
+ } @lang
});
return 1;
More information about the Rt-commit
mailing list