loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.134, 2004/07/04 05:43:12	version 1.135, 2004/07/08 19:58:29
Line 575 END	Line 575 END
my $isfolder=0;	my $isfolder=0;
my $folderarg;	my $folderarg;
if ($uploaded) {	if ($uploaded) {
if ($extension eq 'sequence') {	if ($extension eq 'sequence') {
$icon=$iconpath.'/folder_closed.gif';	$icon=$iconpath.'/folder_closed.gif';
$url=~/$coursenum\/([\/\w]+)\.sequence$/;	$url=~/$coursenum\/([\/\w]+)\.sequence$/;
$url='/adm/coursedocs?';	$url='/adm/coursedocs?';
$folderarg=$1;	$folderarg=$1;
$isfolder=1;	$isfolder=1;
}	} else {
	&Apache::lonnet::allowuploaded('/adm/coursedoc',$url);
	}
}	}
$url=~s/^http\&colon\;\/\//\/adm\/wrapper\/ext\//;	$url=~s/^http\&colon\;\/\//\/adm\/wrapper\/ext\//;
if ((!$isfolder) && ($residx) && ($folder!~/supplemental/)) {	if ((!$isfolder) && ($residx) && ($folder!~/supplemental/)) {