From: Ivan Kohler Date: Mon, 21 Mar 2016 20:39:09 +0000 (-0700) Subject: optimize customer list, RT#20173 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=0e56763a6b3898632d6f0c20c454eed9b0169342 optimize customer list, RT#20173 --- diff --git a/FS/FS/Msgcat.pm b/FS/FS/Msgcat.pm index b6f36bf95..e1bde8b51 100644 --- a/FS/FS/Msgcat.pm +++ b/FS/FS/Msgcat.pm @@ -1,7 +1,7 @@ package FS::Msgcat; use strict; -use vars qw( @ISA @EXPORT_OK $conf $def_locale $debug ); +use vars qw( @ISA @EXPORT_OK $conf $def_locale $debug @translate_auto_insert ); use Exporter; use FS::UID; #use FS::Record qw( qsearchs ); # wtf? won't import... @@ -17,7 +17,8 @@ FS::UID->install_callback( sub { die $@ if $@; $conf = new FS::Conf; $def_locale = $conf->config('locale') || 'en_US'; - $debug = $conf->exists('show-msgcat-codes') + $debug = $conf->exists('show-msgcat-codes'); + @translate_auto_insert = $conf->config('translate-auto-insert'); }); =head1 NAME @@ -77,7 +78,6 @@ sub _gettext { unless $locale eq 'en_US'; $cache{$locale}->{$msgcode} = $msgcode; - my @translate_auto_insert = $conf->config('translate-auto-insert'); if ( $locale ne 'en_US' && grep { $_ eq $locale } @translate_auto_insert ) { # :(