--- loncom/interface/lonaccesstimes.pm 2016/10/22 02:03:31 1.1
+++ loncom/interface/lonaccesstimes.pm 2017/01/31 18:55:03 1.2
@@ -2,7 +2,7 @@
# Display first access times for timed (interval) items for active
# students in a course.
#
-# $Id: lonaccesstimes.pm,v 1.1 2016/10/22 02:03:31 raeburn Exp $
+# $Id: lonaccesstimes.pm,v 1.2 2017/01/31 18:55:03 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -304,7 +304,7 @@ sub print_results {
if ($title eq '') {
$title = &Apache::lonnet::gettitle($item);
}
- $hierarchy = &show_timer_path('resource',$item,$navmap);
+ $hierarchy = &Apache::lonblockingmenu::show_timer_path('resource',$item,$navmap);
if ($hierarchy) {
$path = ' '.
&mt('(in: [_1])',$hierarchy).
@@ -329,7 +329,6 @@ sub print_results {
if (ref($current_members) eq 'ARRAY') {
map { $active{$_->[0]} = 1; } @{$current_members};
}
- #my $shownheader = 0;
my (@hasaccess,@noaccess);
my $key=$env{'request.course.id'}."\0".$symb;
foreach my $name (sort(@students)) {
@@ -338,17 +337,10 @@ sub print_results {
if (!$fullname) { $fullname="$uname:$udom"; }
my %times=&Apache::lonnet::get('firstaccesstimes',
[$key],$udom,$uname);
- # unless ($shownheader) {
- # $r->print('');
- # $shownheader = 1;
- # }
if (!$times{$key}) {
push(@noaccess,[$name,$fullname]);
- # $r->print('
'.&mt('No valid users selected').'
'); - # } } else { if ($crstype eq 'Community') { $r->print(''.&mt('No members selected to check for first access times').'
');