loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.627.2.30, 2020/03/05 18:33:35	version 1.627.2.31, 2021/12/14 01:30:48
Line 3466 ENDPART	Line 3466 ENDPART
if (($ENV{'SERVER_PORT'} == 443) && ($env{'request.course.id'}) &&	if (($ENV{'SERVER_PORT'} == 443) && ($env{'request.course.id'}) &&
(($url =~ m{^\Q/public/$cdom/$cnum/syllabus\E($\|\?)}) \|\|	(($url =~ m{^\Q/public/$cdom/$cnum/syllabus\E($\|\?)}) \|\|
($url =~ m{^\Q/adm/wrapper/ext/\E(?!https:)}))) {	($url =~ m{^\Q/adm/wrapper/ext/\E(?!https:)}))) {
unless (&Apache::lonnet::uses_sts()) {	unless ((&Apache::lonnet::uses_sts()) \|\| (&Apache::lonnet::waf_allssl())) {
$usehttp = 1;	$usehttp = 1;
}	}
}	}
Line 3894 sub handler {	Line 3894 sub handler {
if ($env{'request.course.id'}) {	if ($env{'request.course.id'}) {
my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};	my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};	my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
	my $clientip = &Apache::lonnet::get_requestor_ip($r);
my ($blocked,$blocktext) =	my ($blocked,$blocktext) =
&Apache::loncommon::blocking_status('printout',$cnum,$cdom);	&Apache::loncommon::blocking_status('printout',$clientip,$cnum,$cdom);
if ($blocked) {	if ($blocked) {
my $checkrole = "cm./$cdom/$cnum";	my $checkrole = "cm./$cdom/$cnum";
if ($env{'request.course.sec'} ne '') {	if ($env{'request.course.sec'} ne '') {