loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.49, 2002/08/12 18:21:42	version 1.51, 2002/08/20 13:01:53
Line 90 my @Omit = ();	Line 90 my @Omit = ();
sub handler {	sub handler {
my $r = shift;	my $r = shift;
$r->content_type('text/html');	$r->content_type('text/html');
	&Apache::loncommon::no_cache($r);
$r->send_http_header;	$r->send_http_header;
return OK if $r->header_only;	return OK if $r->header_only;
$fnum=0;	$fnum=0;
Line 688 sub display_line {	Line 689 sub display_line {
$r->print ('<a href="javascript:gothere(\''.$filecom[0].	$r->print ('<a href="javascript:gothere(\''.$filecom[0].
'/\')"><img src="'.$iconpath.'server.gif"');	'/\')"><img src="'.$iconpath.'server.gif"');
$r->print (' border="0" /></a>'."\n");	$r->print (' border="0" /></a>'."\n");
$r->print("Domain - $listname $tabtag</tr></form>\n");	$r->print("Domain - $listname (".
	$Apache::lonnet::domaindescription{$listname}.") $tabtag</tr></form>\n");
return OK;	return OK;

# display user directory	# display user directory