version 1.11, 2004/12/17 22:40:24
|
version 1.13, 2004/12/20 20:13:52
|
Line 149 sub handler {
|
Line 149 sub handler {
|
return OK; |
return OK; |
} |
} |
} |
} |
|
# ------------------------------------Encrypted requests go straight to navmaps |
|
if ($ENV{'request.enc'}) { |
|
$r->content_type('text/html'); |
|
$r->header_out(Location => 'http://'.$ENV{'HTTP_HOST'}.'/adm/navmaps'); |
|
return REDIRECT; |
|
} |
# ------------------------------------------------ Would be standalone resource |
# ------------------------------------------------ Would be standalone resource |
|
|
if (tie(%bighash,'GDBM_File',$ENV{'request.course.fn'}.'.db', |
if (tie(%bighash,'GDBM_File',$ENV{'request.course.fn'}.'.db', |
Line 173 sub handler {
|
Line 178 sub handler {
|
} |
} |
if ($couldbe) { |
if ($couldbe) { |
@possibilities=split(/\,/,$couldbe); |
@possibilities=split(/\,/,$couldbe); |
|
if ($#possibilities==0) { |
|
my $id=$possibilities[0]; |
|
my $resurl=$bighash{'src_'.$id}; |
|
my $mapurl=$bighash{'map_id_'.(split(/\./,$id))[0]}; |
|
my $symb=&make_symb($id); |
|
$r->content_type('text/html'); |
|
&Apache::lonnet::logthis('http://'.$ENV{'HTTP_HOST'}.$resurl.'?symb='.$symb); |
|
$r->header_out(Location => |
|
'http://'.$ENV{'HTTP_HOST'}.$resurl.'?symb='.$symb); |
|
return REDIRECT; |
|
} |
if ($#possibilities>0) { |
if ($#possibilities>0) { |
# ----------------------------------------------- Okay, really multiple choices |
# ----------------------------------------------- Okay, really multiple choices |
$r->content_type('text/html'); |
$r->content_type('text/html'); |