From 3893d4aa23fe206ed319389617c798c053692b78 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Mon, 21 Mar 2016 13:39:11 -0700 Subject: [PATCH] optimize customer list, RT#20173 --- FS/FS/Msgcat.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/FS/FS/Msgcat.pm b/FS/FS/Msgcat.pm index ce0fa78af..1978aa789 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 ) { # :( -- 2.11.0