loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.154, 2004/12/12 19:54:56	version 1.155, 2004/12/13 01:57:10
Line 1681 sub handler {	Line 1681 sub handler {
# is this a standard course?	# is this a standard course?

my $standard=($ENV{'request.course.uri'}=~/^\/uploaded\//);	my $standard=($ENV{'request.course.uri'}=~/^\/uploaded\//);
my $forcestandard;	my $forcestandard = 0;
my $forcesupplement;	my $forcesupplement;
my $script='';	my $script='';
my $allowed;	my $allowed;
Line 1707 sub handler {	Line 1707 sub handler {
$showdoc='/'.$1;	$showdoc='/'.$1;
}	}
unless ($showdoc) { # got called from remote	unless ($showdoc) { # got called from remote
$forcestandard=($ENV{'form.folder'}=~/^default_/);	if (($ENV{'form.folder'}=~/^default_$/) \|\|
	($ENV{'form.folder'} =~ m#^\d+/(pages\|sequences)/#)) {
	$forcestandard = 1;
	}
$forcesupplement=($ENV{'form.folder'}=~/^supplemental_/);	$forcesupplement=($ENV{'form.folder'}=~/^supplemental_/);

# does this user have privileges to post, etc?	# does this user have privileges to post, etc?