--- rat/lonuserstate.pm 2000/09/30 17:26:28 1.9 +++ rat/lonuserstate.pm 2000/10/11 18:31:00 1.11 @@ -11,7 +11,7 @@ # 7/1,7/3,7/4,7/7,7/8,7/10 Gerd Kortemeyer) # # 7/15,7/17,7/18,8/1,8/2,8/4,8/5,8/21,8/22,8/23,8/30, -# 9/2,9/4,9/29,9/30 Gerd Kortemeyer +# 9/2,9/4,9/29,9/30,10/2,10/11 Gerd Kortemeyer package Apache::lonuserstate; @@ -42,8 +42,7 @@ sub loadmap { my $fn='/home/httpd/html'.$uri; - unless (($fn=~/\.course$/) || - ($fn=~/\.sequence$/) || + unless (($fn=~/\.sequence$/) || ($fn=~/\.page$/)) { $errtext.="Invalid map: $fn\n"; return OK; @@ -117,8 +116,7 @@ sub loadmap { $hash{'type_'.$rid}='normal'; } - if (($turi=~/\.course$/) || - ($turi=~/\.sequence$/) || + if (($turi=~/\.sequence$/) || ($turi=~/\.page$/)) { $hash{'is_map_'.$rid}=1; &loadmap($turi); @@ -312,6 +310,9 @@ sub readmap { return 'No course data available.'; } @cond=('true:normal'); + unlink($fn.'.db'); + unlink($fn.'_symb.db'); + unlink($fn.'.state'); if (tie(%hash,'GDBM_File',"$fn.db",&GDBM_WRCREAT,0640)) { %hash=(); $errtext='';