--- loncom/interface/lonstatistics.pm 2010/01/06 18:29:10 1.148.2.1 +++ loncom/interface/lonstatistics.pm 2010/01/06 19:41:49 1.148.2.2 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.148.2.1 2010/01/06 18:29:10 raeburn Exp $ +# $Id: lonstatistics.pm,v 1.148.2.2 2010/01/06 19:41:49 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -820,6 +820,8 @@ sub handler { my $gcicustom = &Apache::loncommon::needs_gci_custom(); if ($gcicustom) { my $now = time; + my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; + my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; my $courseopt=&Apache::lonnet::get_courseresdata($cnum,$cdom); my $duedate = $courseopt->{$env{'request.course.id'}.'.0.duedate'}; if ((!$duedate) || ($duedate > $now)) { @@ -827,7 +829,7 @@ sub handler { $r->print('
'.&mt('Aggregate test performance data will be available after the Concept Test end date: [_1].', - &Apache::lonlocal::locallocaltime($duedate).'
'); + &Apache::lonlocal::locallocaltime($duedate)).''); } else { $r->print(''. &mt('Aggregate test performance data unavailable without definition of an end date for the Concept Test.').'
'); @@ -835,6 +837,7 @@ sub handler { $r->print(&Apache::loncommon::end_page()); return OK; } + } # # Extract form elements from query string