loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.85, 2002/10/29 20:58:50	version 1.86, 2002/11/14 14:47:53
Line 378 ENDPART	Line 378 ENDPART
$selectionmade = 1;	$selectionmade = 1;
my %moreenv;	my %moreenv;
$moreenv{'form.grade_target'}='tex';	$moreenv{'form.grade_target'}='tex';
if ($ENV{'request.role'}=~m/^au\./ or $ENV{'request.role'}=~m/^ca\./) {	if (&Apache::lonnet::allowed('bre',$ENV{'form.url'})) {
$ENV{'form.url'}=~s/http:\/\/[^\/]+//;	$ENV{'form.url'}=~s/http:\/\/[^\/]+//;
}	}
$moreenv{'request.filename'}=$ENV{'form.url'};	$moreenv{'request.filename'}=$ENV{'form.url'};