[Rt-commit] r10045 - in rt/branches/3.999-DANGEROUS: lib/RT

[jesse at bestpractical.com]

Author: jesse
Date: Sun Dec 23 13:37:17 2007
New Revision: 10045

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/lib/RT/I18N.pm

Log:
 r74075 at pinglin:  jesse | 2007-12-23 13:02:43 -0500
 * cut down RT I18N that dupes new jifty functionality


Modified: rt/branches/3.999-DANGEROUS/lib/RT/I18N.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/I18N.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/I18N.pm	Sun Dec 23 13:37:17 2007
@@ -90,40 +90,6 @@
 =cut
 
 sub Init {
-    require File::Glob;
-
-    my @lang = RT->Config->Get('LexiconLanguages');
-    @lang = ('*') unless @lang;
-
-    # load default functions
-    require substr(__FILE__, 0, -3) . '/i_default.pm';
-
-    # Load language-specific functions
-    foreach my $file ( File::Glob::bsd_glob(substr(__FILE__, 0, -3) . "/*.pm") ) {
-        unless ( $file =~ /^([-\w\s\.\/\\~:]+)$/ ) {
-            warn("$file is tainted. not loading");
-            next;
-        }
-        $file = $1;
-
-        my ($lang) = ($file =~ /([^\\\/]+?)\.pm$/);
-        next unless grep $_ eq '*' || $_ eq $lang, @lang;
-        require $file;
-    }
-
-    # 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
-    });
-
-    return 1;
 }
 
 =head2 encoding
@@ -463,10 +429,5 @@
 }
 # }}}
 
-eval "require RT::I18N_Vendor";
-die $@ if ($@ && $@ !~ qr{^Can't locate RT/I18N_Vendor.pm});
-eval "require RT::I18N_Local";
-die $@ if ($@ && $@ !~ qr{^Can't locate RT/I18N_Local.pm});
-
 1;  # End of module.