loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.536, 2012/12/06 13:54:47	version 1.538, 2013/03/11 21:37:10
Line 1667 sub handler {	Line 1667 sub handler {
my ($filetype,$breadcrumbtext);	my ($filetype,$breadcrumbtext);
if ($file =~ /\.(sty\|css\|js\|txt\|tex)$/) {	if ($file =~ /\.(sty\|css\|js\|txt\|tex)$/) {
$filetype=$1;	$filetype=$1;
$env{'request.uri'}=$request->uri;
} else {	} else {
$filetype='html';	$filetype='html';
	}
	unless ($env{'request.uri'}) {
$env{'request.uri'}=$request->uri;	$env{'request.uri'}=$request->uri;
	&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
	['todocs']);
}	}
if ($filetype eq 'sty') {	if ($filetype eq 'sty') {
$breadcrumbtext = 'Style File Editor';	$breadcrumbtext = 'Style File Editor';
Line 1877 sub get_courseupload_hierarchy {	Line 1880 sub get_courseupload_hierarchy {
while (@folders) {	while (@folders) {
my $folder=shift(@folders);	my $folder=shift(@folders);
my $foldername=shift(@folders);	my $foldername=shift(@folders);
	$foldername =~ s/\:(\d)\:(\w)\:(\w):(\d)\:?(\d*)$//;
push(@pathitems,&unescape($foldername));	push(@pathitems,&unescape($foldername));
}	}
if ($title) {	if ($title) {