--- loncom/interface/lonsource.pm 2005/06/23 23:51:32 1.14 +++ loncom/interface/lonsource.pm 2006/06/22 18:17:23 1.17 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Souce Code handler # -# $Id: lonsource.pm,v 1.14 2005/06/23 23:51:32 www Exp $ +# $Id: lonsource.pm,v 1.17 2006/06/22 18:17:23 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -40,6 +40,7 @@ use Apache::lonmeta; use Apache::File; use Apache::lonlocal; use HTML::Entities; +use LONCAPA; sub make_link { my ($filename, $listname) = @_; @@ -54,9 +55,7 @@ sub stage_2 { &Apache::loncommon::content_type($r,'text/html'); my ($uname, $udom) = &Apache::loncacc::constructaccess('/~'.$author.'/',$r->dir_config('lonDefDomain')); $r->send_http_header; - my $html=&Apache::lonxml::xmlbegin(); - $r->print($html.'