rat/lonratedt.pm - diff

Return to lonratedt.pm CVS log

Up to [LON-CAPA] / rat

version 1.61, 2004/11/13 21:17:55	version 1.62, 2004/11/17 19:59:29
Line 1148 sub viewmap {	Line 1148 sub viewmap {
foreach (&attemptread(&Apache::lonnet::filelocation('',$url))) {	foreach (&attemptread(&Apache::lonnet::filelocation('',$url))) {
if (defined($_)) {	if (defined($_)) {
$idx++;	$idx++;
my ($title,$url)=split(/\:/,$_);	my ($title,$url,$cond)=split(/\:/,$_);
	if ($cond eq 'cond') { next; }
$title=~s/\&colon\;/\:/g;	$title=~s/\&colon\;/\:/g;
$url=~s/\&colon\;/\:/g;	$url=~s/\&colon\;/\:/g;
unless ($title) { $title=(split(/\//,$url))[-1] };	unless ($title) { $title=(split(/\//,$url))[-1] };
Line 1158 sub viewmap {	Line 1159 sub viewmap {
}	}
$r->print(&Apache::lonratsrv::qtescape($title));	$r->print(&Apache::lonratsrv::qtescape($title));
if ($url) { $r->print('</a>'); }	if ($url) { $r->print('</a>'); }
$r->print('<br>');	$r->print("<br />\n");
}	}
}	}
$r->print('</body></html>');	$r->print('</body></html>');