ExtMail服务器社区 » Perl 语言编程 » 选择extmail界面语言

motoste 发表于 2008-5-29 16:49

选择extmail界面语言

小弟想在登陆extmail时选择语言，将Login.pm中的_initme函数修改为：
sub _initme {
        my $self = shift;
        $_[0] = $self;
        my $q = $self->{query};
        my $choose_lang =0;
        my $language = '';
        $choose_lang = $q->cgi("choose_lang");
        if($choose_lang == 0) {        #zh_CN
                $language = "zh_CN";
                $_[0]->userconfig->{lang} => "zh_CN";
        }else {        #en_US
                $language = "en_US";
                $_[0]->userconfig->{lang} => "en_US";
        }
   #initlang($_[0]->userconfig->{lang}, __PACKAGE__); #用这句界面没反应
   initlang($language, __PACKAGE__); #用这句，login的界面可切换。切换成英文模式，输入用户名密码进去后界面又全是中文
    $_[0]->{tpl}->assign( lang_charset => $lang_charset );
    $_[0]->{tpl}->assign( \%lang_login );
}

$_[0]->userconfig->{lang}是全局变量么，如果是，那怎么修改后不起作用？怎么解决？

motoste 发表于 2008-6-3 14:12

回复 #1 motoste 的帖子

问题还是没有解决，自己顶一下

fengyong 发表于 2008-7-3 08:30

我的想法，在extmail 里设置一个cookie，然后通过cookie 判断用户选择的语言。
估计要看很多代码。

小雁塔 发表于 2008-10-31 09:14

没打算这么改过。。帮顶

查看完整版本: 选择extmail界面语言