--- loncom/interface/statistics/lonpercentage.pm	2003/02/25 20:47:47	1.9
+++ loncom/interface/statistics/lonpercentage.pm	2006/05/30 12:46:49	1.10
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonpercentage.pm,v 1.9 2003/02/25 20:47:47 matthew Exp $
+# $Id: lonpercentage.pm,v 1.10 2006/05/30 12:46:49 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -32,6 +32,9 @@ use strict;
 use Apache::lonhtmlcommon;
 use Apache::loncoursedata;
 use GDBM_File;
+use lib '/home/httpd/lib/perl/';
+use LONCAPA;
+ 
 
 
 sub BuildPercentageGraph {
@@ -327,9 +330,9 @@ sub TableData {
 
 	foreach my $name (sort(split(':::', $percentage->{$_}))) {
 	    $Ptr .= '<a href="/adm/statistics?reportSelected=';
-	    $Ptr .= &Apache::lonnet::escape('Student Assessment');
+	    $Ptr .= &escape('Student Assessment');
 	    $Ptr .= '&StudentAssessmentStudent=';
-	    $Ptr .= &Apache::lonnet::escape($cache->{$name.':fullname'}).'">';
+	    $Ptr .= &escape($cache->{$name.':fullname'}).'">';
 	    $Ptr .= $cache->{$name.':fullname'};
 	    $Ptr .= '</a>,&nbsp&nbsp';
         }