--- loncom/interface/statistics/lonproblemstatistics.pm 2006/05/05 20:03:43 1.108 +++ loncom/interface/statistics/lonproblemstatistics.pm 2006/08/18 15:15:38 1.110 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonproblemstatistics.pm,v 1.108 2006/05/05 20:03:43 raeburn Exp $ +# $Id: lonproblemstatistics.pm,v 1.110 2006/08/18 15:15:38 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -60,6 +60,9 @@ use Apache::lonlocal; use Spreadsheet::WriteExcel; use Apache::lonstathelpers(); use Time::HiRes; +use lib '/home/httpd/lib/perl/'; +use LONCAPA; + my @StatsArray; my %SeqStat; # keys are symbs, values are hash refs @@ -614,7 +617,7 @@ sub CreateInterface { $Str .= ''; $Str .= ''.&mt('Sections').''; $Str .= ''.&mt('Groups').''; - $Str .= ''.&mt('Enrollment Status').''; + $Str .= ''.&mt('Access Status').''; $Str .= ''.&mt('Sequences and Folders').''; $Str .= ''.&mt('Statistics').''; $Str .= ''. @@ -1565,7 +1568,7 @@ sub get_statistics { $data->{'container'} = $sequence->compTitle; $data->{'title'} = $resource->compTitle; $data->{'title.link'} = $resource->src.'?symb='. - &Apache::lonnet::escape($resource->symb); + &escape($resource->symb); # if ($SelectedFields{'deg_of_disc'}) { $data->{'deg_of_disc'} =