loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.141, 2006/03/16 22:42:58	version 1.144, 2006/06/08 07:20:41
Line 119 sub handler {	Line 119 sub handler {

$extrafield='';	$extrafield='';
my $diropendb =	my $diropendb =
"/home/httpd/perl/tmp/$env{'user.domain'}_$env{'user.name'}_indexer.db";	"/home/httpd/perl/tmp/$env{'user.domain'}_$env{'user.name'}_sel_res.db";
%hash = ();	%hash = ();
{	{
my %dbfile;	my %dbfile;
Line 159 ENDSUBM	Line 159 ENDSUBM
$r->print(&Apache::loncommon::start_page(undef,$js,	$r->print(&Apache::loncommon::start_page(undef,$js,
{'only_body' =>1,	{'only_body' =>1,
'add_entries' =>	'add_entries' =>
'onLoad="load();"',}).	{'onload' => "load();"},}
	).
&Apache::loncommon::end_page());	&Apache::loncommon::end_page());
return OK;	return OK;
}	}
Line 703 sub dynmetaread {	Line 704 sub dynmetaread {
}	}
# Actually get the data	# Actually get the data
%dynhash=	%dynhash=
(%dynhash,&Apache::lonmeta::get_dynamic_metadata_from_sql($uri));	(%dynhash,&Apache::lonmeta::get_dynamic_metadata_from_sql($uri.'/'));
# Remember that we got it	# Remember that we got it
$dynread{$uri}=1;	$dynread{$uri}=1;
}	}