|
version 1.45, 2008/05/31 23:37:49
|
version 1.46, 2008/07/02 21:10:41
|
|
Line 165 use Apache::localize;
|
Line 165 use Apache::localize;
|
| use locale; |
use locale; |
| use POSIX qw(locale_h strftime); |
use POSIX qw(locale_h strftime); |
| use DateTime(); |
use DateTime(); |
| |
use DateTime::TimeZone; |
| |
|
| require Exporter; |
require Exporter; |
| |
|
|
Line 267 sub get_language_handle {
|
Line 268 sub get_language_handle {
|
| |
|
| # ========================================================== Localize localtime |
# ========================================================== Localize localtime |
| sub gettimezone { |
sub gettimezone { |
| |
my $timezone; |
| if ($Apache::lonnet::env{'course.'.$Apache::lonnet::env{'request.course.id'}.'.timezone'}) { |
if ($Apache::lonnet::env{'course.'.$Apache::lonnet::env{'request.course.id'}.'.timezone'}) { |
| return $Apache::lonnet::env{'course.'.$Apache::lonnet::env{'request.course.id'}.'.timezone'}; |
$timezone = $Apache::lonnet::env{'course.'.$Apache::lonnet::env{'request.course.id'}.'.timezone'}; |
| } elsif ($Apache::lonnet::env{'request.course.id'} ne '') { |
} elsif ($Apache::lonnet::env{'request.course.id'} ne '') { |
| my $cdom = $Apache::lonnet::env{'course.'.$Apache::lonnet::env{'request.course.id'}.'.domain'}; |
my $cdom = $Apache::lonnet::env{'course.'.$Apache::lonnet::env{'request.course.id'}.'.domain'}; |
| if ($cdom ne '') { |
if ($cdom ne '') { |
| my %domdefaults = &Apache::lonnet::get_domain_defaults($cdom); |
my %domdefaults = &Apache::lonnet::get_domain_defaults($cdom); |
| if ($domdefaults{'timezone_def'} ne '') { |
if ($domdefaults{'timezone_def'} ne '') { |
| return $domdefaults{'timezone_def'}; |
$timezone = $domdefaults{'timezone_def'}; |
| } |
} |
| } |
} |
| } |
} |
| |
if ($timezone ne '') { |
| |
if (DateTime::TimeZone->is_valid_name($timezone)) { |
| |
return $timezone; |
| |
} |
| |
} |
| return 'local'; |
return 'local'; |
| } |
} |
| |
|
![[BACK]](/icons/back.gif){kind=icon}
Return to lonlocal.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / localize