loncom/lonnet/perl/lonnet.pm - diff

Return to lonnet.pm CVS log

Up to [LON-CAPA] / loncom / lonnet / perl

version 1.1172.2.100, 2018/09/21 03:58:53	version 1.1172.2.101, 2018/09/22 03:11:40
Line 2858 sub ssi {	Line 2858 sub ssi {

$request->header(Cookie => $ENV{'HTTP_COOKIE'});	$request->header(Cookie => $ENV{'HTTP_COOKIE'});

if ($islocal) {	if (($env{'request.course.id'}) &&
	($form{'grade_courseid'} eq $env{'request.course.id'}) &&
	($form{'grade_username'} ne '') && ($form{'grade_domain'} ne '') &&
	($form{'grade_symb'} ne '') &&
	(&Apache::lonnet::allowed('mgr',$env{'request.course.id'}.
	($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:'')))) {
if (LWP::UserAgent->VERSION >= 5.834) {	if (LWP::UserAgent->VERSION >= 5.834) {
my $ua=new LWP::UserAgent;	my $ua=new LWP::UserAgent;
$ua->local_address('127.0.0.1');	$ua->local_address('127.0.0.1');