Return to lonindexer.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.208, 2010/08/13 13:32:36 | version 1.209, 2011/07/04 09:24:58 |
---|---|
Line 120 sub handler { | Line 120 sub handler { |
my $colspan=''; | my $colspan=''; |
$extrafield=''; | $extrafield=''; |
my $diropendb = | my $diropendb = LONCAPA::tempdir() . |
"/home/httpd/perl/tmp/$env{'user.domain'}_$env{'user.name'}_sel_res.db"; | "$env{'user.domain'}_$env{'user.name'}_sel_res.db"; |
%hash = (); | %hash = (); |
{ | { |
my %dbfile; | my %dbfile; |