--- loncom/interface/lonannounce.pm 2008/09/20 22:18:05 1.71.2.1 +++ loncom/interface/lonannounce.pm 2008/09/25 01:39:29 1.72 @@ -1,7 +1,7 @@ # The LearningOnline Network # Announce # -# $Id: lonannounce.pm,v 1.71.2.1 2008/09/20 22:18:05 raeburn Exp $ +# $Id: lonannounce.pm,v 1.72 2008/09/25 01:39:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -660,8 +660,7 @@ SERVERANNOUNCE $class .= " LC_calendar_pickdate"; } # ------------------------------------------------ Determine first day of a week -# my $datelocale = &Apache::lonlocal::getdatelocale(); - my $datelocale; + my $datelocale = &Apache::lonlocal::getdatelocale(); my $days_in_week = 7; my $startweek = 0; if (ref($datelocale)) { @@ -703,7 +702,6 @@ SERVERANNOUNCE } $r->print(''); - my $tk=&Apache::loncommon::maketime(%firstday); my $outp; my $nm;