--- loncom/html/adm/helper/resettimes.helper 2005/01/16 08:21:49 1.2 +++ loncom/html/adm/helper/resettimes.helper 2007/06/06 20:18:50 1.4 @@ -4,8 +4,8 @@ Select - Reset times on one or more maps for a single student. - Reset times on a single map for a section or whole clase. + Reset times on one or more folders/maps for a single student. + Reset times on a single folder/map for a section or whole clase. @@ -17,13 +17,13 @@ - This is a list of maps and times they were accessed, plese select those you want deleted. + This is a list of folders/maps and times they were accessed, plese select those you want deleted. my ($uname,$udom,$sec,$fullname)=split(':',$helper->{'VARS'}{'stu1'}); my %times=&Apache::lonnet::dump('firstaccesstimes',$udom,$uname, - "^$ENV{'request.course.id'}\0"); + "^$env{'request.course.id'}\0"); foreach my $res (sort(keys(%times))) { my (undef,$symb)=split("\0",$res); my $escsymb=&Apache::lonnet::escape($symb); @@ -45,7 +45,7 @@ if (!$fullname) { $fullname="$uname\@$udom"; } return '
  • '.$fullname.'
  • '; - for maps
      +
    for folders/maps
      my $list; my @symbs=split(/\|\|\|/,$helper->{'VARS'}{'delete'}); @@ -63,7 +63,7 @@ &Apache::lonnet::logthis($helper->{'VARS'}{'delete'}); if ($helper->{'STATE'} ne 'FinishStu') { return; } my $result; - my $courseid=$ENV{'request.course.id'}; + my $courseid=$env{'request.course.id'}; my ($uname,$udom,$sec,$fullname)=split(':',$helper->{'VARS'}{'stu1'}); &Apache::lonnet::logthis($helper->{'VARS'}{'delete'}); foreach my $escsymb (split(/\|\|\|/,$helper->{'VARS'}{'delete'})) { @@ -87,7 +87,7 @@ - + Choose a resource return $res->is_map() @@ -121,7 +121,7 @@ if ($helper->{'STATE'} ne 'FINISH') { return; } my $result; my $symb=$helper->{'VARS'}{'res2'}; - my $key=$ENV{'request.course.id'}."\0".$symb; + my $key=$env{'request.course.id'}."\0".$symb; my @names=split(/\|\|\|/,$helper->{'VARS'}{'stu1'}); foreach my $name (@names) { my ($uname,$udom,$sec,$fullname)=split(':',$name);