version 1.62, 2011/03/28 21:10:41
|
version 1.65, 2014/12/11 01:47:25
|
Line 81 Inside might be something like this
|
Line 81 Inside might be something like this
|
if ($status eq 'WON') { |
if ($status eq 'WON') { |
$message='You have won.'; |
$message='You have won.'; |
} elsif ($status eq 'LOST') { |
} elsif ($status eq 'LOST') { |
$message='You are a total looser.'; |
$message='You are a total loser.'; |
} |
} |
return $message; |
return $message; |
} |
} |
Line 103 The first two examples are easy:
|
Line 103 The first two examples are easy:
|
if ($status eq 'WON') { |
if ($status eq 'WON') { |
$message='You have won.'; |
$message='You have won.'; |
} elsif ($status eq 'LOST') { |
} elsif ($status eq 'LOST') { |
$message='You are a total looser.'; |
$message='You are a total loser.'; |
} |
} |
return &mt($message); |
return &mt($message); |
} |
} |
Line 135 like this:
|
Line 135 like this:
|
'You have won.' |
'You have won.' |
=> 'Sie haben gewonnen.', |
=> 'Sie haben gewonnen.', |
|
|
'You are a total looser.' |
'You are a total loser.' |
=> 'Sie sind der totale Verlierer.', |
=> 'Sie sind der totale Verlierer.', |
|
|
'Rules' |
'Rules' |
Line 264 sub preferred_languages {
|
Line 264 sub preferred_languages {
|
|
|
my $defdom = &Apache::lonnet::default_login_domain(); |
my $defdom = &Apache::lonnet::default_login_domain(); |
foreach my $domtype ($Apache::lonnet::env{'user.domain'},$Apache::lonnet::env{'request.role.domain'},$defdom) { |
foreach my $domtype ($Apache::lonnet::env{'user.domain'},$Apache::lonnet::env{'request.role.domain'},$defdom) { |
if ($domtype ne '') { |
if (($domtype ne '') && ($domtype ne 'public')) { |
my %domdefs = &Apache::lonnet::get_domain_defaults($domtype); |
my %domdefs = &Apache::lonnet::get_domain_defaults($domtype); |
if ($domdefs{'lang_def'} ne '') { |
if ($domdefs{'lang_def'} ne '') { |
push(@languages,$domdefs{'lang_def'}); |
push(@languages,$domdefs{'lang_def'}); |
Line 325 sub current_locale {
|
Line 325 sub current_locale {
|
|
|
sub texthash { |
sub texthash { |
my %hash=@_; |
my %hash=@_; |
foreach (keys %hash) { |
foreach (keys(%hash)) { |
$hash{$_}=&mt($hash{$_}); |
$hash{$_}=&mt($hash{$_}); |
} |
} |
return %hash; |
return %hash; |
Line 382 sub gettimezone {
|
Line 382 sub gettimezone {
|
if ($uroledomdefs{'timezone_def'} ne '') { |
if ($uroledomdefs{'timezone_def'} ne '') { |
$timezone = $uroledomdefs{'timezone_def'}; |
$timezone = $uroledomdefs{'timezone_def'}; |
} |
} |
} elsif ($Apache::lonnet::env{'user.domain'} ne '') { |
} elsif (($Apache::lonnet::env{'user.domain'} ne '') && |
|
($Apache::lonnet::env{'user.domain'} ne 'public')) { |
my %udomdefaults = |
my %udomdefaults = |
&Apache::lonnet::get_domain_defaults($Apache::lonnet::env{'user.domain'}); |
&Apache::lonnet::get_domain_defaults($Apache::lonnet::env{'user.domain'}); |
if ($udomdefaults{'timezone_def'} ne '') { |
if ($udomdefaults{'timezone_def'} ne '') { |