version 1.265, 2006/05/30 12:46:09
|
version 1.266, 2006/06/08 07:20:41
|
Line 155 sub handler {
|
Line 155 sub handler {
|
## |
## |
my $domain = $r->dir_config('lonDefDomain'); |
my $domain = $r->dir_config('lonDefDomain'); |
$diropendb= "/home/httpd/perl/tmp/". |
$diropendb= "/home/httpd/perl/tmp/". |
"$env{'user.domain'}_$env{'user.name'}_searchcat.db"; |
"$env{'user.domain'}_$env{'user.name'}_sel_res.db"; |
# |
# |
# set the name of the persistent database |
# set the name of the persistent database |
# $env{'form.persistent_db_id'} can only have digits in it. |
# $env{'form.persistent_db_id'} can only have digits in it. |