loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.504, 2012/11/11 17:37:17	version 1.505, 2012/11/13 22:49:15
Line 2163 sub entryline {	Line 2163 sub entryline {
$esc_path=&escape($env{'form.pagepath'});	$esc_path=&escape($env{'form.pagepath'});
$path = &HTML::Entities::encode($env{'form.pagepath'},'<>&"');	$path = &HTML::Entities::encode($env{'form.pagepath'},'<>&"');
}	}
	my $isexternal;
if (!$supplementalflag && $residx) {	if (!$supplementalflag && $residx) {
my $currurl = $url;	my $currurl = $url;
$currurl =~ s{^http(\|s)(&colon;\|:)//}{/adm/wrapper/ext/};	$currurl =~ s{^http(\|s)(&colon;\|:)//}{/adm/wrapper/ext/};
	if ($currurl =~ m{^/adm/wrapper/ext/}) {
	$isexternal = 1;
	}
my $path = 'uploaded/'.	my $path = 'uploaded/'.
$env{'course.'.$env{'request.course.id'}.'.domain'}.'/'.	$env{'course.'.$env{'request.course.id'}.'.domain'}.'/'.
$env{'course.'.$env{'request.course.id'}.'.num'}.'/';	$env{'course.'.$env{'request.course.id'}.'.num'}.'/';
Line 2281 sub entryline {	Line 2285 sub entryline {
\|/aboutme$	\|/aboutme$
\|/navmaps$	\|/navmaps$
\|/bulletinboard$	\|/bulletinboard$
\|\.html$	\|\.html$)}x)
\|^/adm/wrapper/ext)}x)) {	\|\| $isexternal) {
$skip_confirm = 1;	$skip_confirm = 1;
}	}