Return to lonindexer.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.143, 2006/05/31 16:22:10 | 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; |