loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.65, 2002/09/16 14:20:33	version 1.67, 2002/09/16 20:38:46
Line 358 ENDPART	Line 358 ENDPART
$moreenv{'request.filename'}=$ENV{'form.url'};	$moreenv{'request.filename'}=$ENV{'form.url'};
&Apache::lonnet::appenv(%moreenv);	&Apache::lonnet::appenv(%moreenv);
my $texversion=&Apache::lonnet::ssi($ENV{'form.url'});	my $texversion=&Apache::lonnet::ssi($ENV{'form.url'});
&Apache::lonnet::logthis(" Got $result");
&Apache::lonnet::delenv('form.grade_target');	&Apache::lonnet::delenv('form.grade_target');
$result .= $texversion;	$result .= $texversion;
if ($ENV{'form.url'}=~m/\.page\s*$/) {	if ($ENV{'form.url'}=~m/\.page\s*$/) {
Line 954 sub details_for_menu {	Line 953 sub details_for_menu {
sub handler {	sub handler {

my $r = shift;	my $r = shift;

	my $loaderror=&Apache::lonnet::overloaderror($r);
	if ($loaderror) { return $loaderror; }
	$loaderror=
	&Apache::lonnet::overloaderror($r,
	$ENV{'course.'.$ENV{'request.course.id'}.'.home'});
	if ($loaderror) { return $loaderror; }

$r->content_type('text/html');	$r->content_type('text/html');
$r->send_http_header;	$r->send_http_header;
$r->print(&Apache::loncommon::bodytag("Printing"));	$r->print(&Apache::loncommon::bodytag("Printing"));