version 1.142, 2006/04/10 21:40:08
|
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 704 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; |
} |
} |