Update T_current_language.pl

Test to avoid the "if" cascade for $current_language (see master/stats.pl l 301 - 370)