Committer: sbelyaev
iLJSUP-13673: memcached usage optimization for language variablesU trunk/cgi-bin/LJ/Lang.pm
Modified: trunk/cgi-bin/LJ/Lang.pm =================================================================== --- trunk/cgi-bin/LJ/Lang.pm 2012-09-17 12:25:04 UTC (rev 22907) +++ trunk/cgi-bin/LJ/Lang.pm 2012-09-17 12:30:56 UTC (rev 22908) @@ -724,9 +724,7 @@ ## %memkeys: lower-case code --> memcache key my %memkeys; foreach my $code ( keys %lc_codes ) { - my @code_array = split //, $code; - my $cache_key = $code_array[1] ne '.' ? "ml.${lang}.${dmid}.${code}" - : "ml.${lang}.${dmid}${code}"; + my $cache_key = "ml.${lang}.${dmid}.${code}"; my $text = undef; $text = $TXT_CACHE{$cache_key} unless $LJ::NO_ML_CACHE;