[LON-CAPA-cvs] cvs: loncom(GCI_3) /interface lonstatistics.pm
raeburn
raeburn@source.lon-capa.org
Tue, 09 Nov 2010 15:01:53 -0000
raeburn Tue Nov 9 15:01:53 2010 EDT
Modified files: (Branch: GCI_3)
/loncom/interface lonstatistics.pm
Log:
- Customization for GCI_3.
- Breadcrumbs when Statistics functionality is unavailable prior to
of Concept Test end date.
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.148.2.5 loncom/interface/lonstatistics.pm:1.148.2.6
--- loncom/interface/lonstatistics.pm:1.148.2.5 Sun Sep 12 17:40:33 2010
+++ loncom/interface/lonstatistics.pm Tue Nov 9 15:01:53 2010
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonstatistics.pm,v 1.148.2.5 2010/09/12 17:40:33 raeburn Exp $
+# $Id: lonstatistics.pm,v 1.148.2.6 2010/11/09 15:01:53 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -853,7 +853,11 @@
my $courseopt=&Apache::lonnet::get_courseresdata($cnum,$cdom);
my $duedate = $courseopt->{$env{'request.course.id'}.'.0.duedate'};
if ((!$duedate) || ($duedate > $now)) {
- $r->print(&Apache::loncommon::start_page("Course Statistics"));
+ my $brcrum = [{href=> '/adm/statistics',
+ text=> 'Statistics',}];
+ my $args = {bread_crumbs => $brcrum,
+ bread_crumbs_component => 'Statistics Main Page'};
+ $r->print(&Apache::loncommon::start_page('Course Statistics',undef,$args));
$r->print('<h3>'.&mt('Display of statistics').'</h3>');
if ($duedate > $now) {
$r->print('<p>'.&mt('Aggregate test performance data will be available after the Concept Test end date: [_1].',