version 1.20, 2002/04/11 15:43:40
|
version 1.21, 2002/04/11 18:19:46
|
Line 206 sub handler {
|
Line 206 sub handler {
|
my ($mapurl,$mapnum,$thisurl)=split(/\_\_\_/,$position); |
my ($mapurl,$mapnum,$thisurl)=split(/\_\_\_/,$position); |
$cachehash{$mapurl}{$thisurl}=$mapnum; |
$cachehash{$mapurl}{$thisurl}=$mapnum; |
$cachehash{$mapurl}{'last_known'}=&Apache::lonnet::declutter($currenturl); |
$cachehash{$mapurl}{'last_known'}=&Apache::lonnet::declutter($currenturl); |
|
my $startoutmap=$mapurl; |
|
|
# ============================================================ Tie the big hash |
# ============================================================ Tie the big hash |
if (tie(%hash,'GDBM_File',$ENV{'request.course.fn'}.'.db', |
if (tie(%hash,'GDBM_File',$ENV{'request.course.fn'}.'.db', |