--- rat/lonpage.pm 2006/04/04 19:54:51 1.74 +++ rat/lonpage.pm 2006/05/30 17:15:10 1.75 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Page Handler # -# $Id: lonpage.pm,v 1.74 2006/04/04 19:54:51 albertel Exp $ +# $Id: lonpage.pm,v 1.75 2006/05/30 17:15:10 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -39,6 +39,9 @@ use Apache::lonmenu; use HTML::TokeParser; use GDBM_File; use Apache::lonsequence; +use lib '/home/httpd/lib/perl/'; +use LONCAPA; + # -------------------------------------------------------------- Module Globals my %hash; @@ -426,13 +429,13 @@ sub handler { $esrc=&Apache::lonenc::encrypted($esrc); } unless ($hash{'src_'.$rid} =~ m-^/uploaded/-) { - $metainfo =''. + $metainfo =''. ''. ''. ''; } $metainfo .= ''. ''. ''; @@ -446,17 +449,17 @@ sub handler { '___'.$resid.'___'. &Apache::lonnet::declutter($hash{'src_'.$rid}); $metainfo.= - ''. '&command=submission">'. ''. ''. - ''. '&command=gradingmenu">'. ''. ''. - ''. '" >'. ''.