Return to lonuserstate.pm CVS log | Up to [LON-CAPA] / rat |
version 1.35, 2002/07/25 16:55:53 | version 1.36, 2002/07/30 20:01:40 |
---|---|
Line 473 sub readmap { | Line 473 sub readmap { |
unlink($fn.'parms.db'); | unlink($fn.'parms.db'); |
undef %randompick; | undef %randompick; |
$retfurl=''; | $retfurl=''; |
if ((tie(%hash,'GDBM_File',"$fn.db",&GDBM_WRCREAT,0640)) && | if ((tie(%hash,'GDBM_File',"$fn.db",&GDBM_WRCREAT(),0640)) && |
(tie(%parmhash,'GDBM_File',$fn.'_parms.db',&GDBM_WRCREAT,0640))) { | (tie(%parmhash,'GDBM_File',$fn.'_parms.db',&GDBM_WRCREAT(),0640))) { |
%hash=(); | %hash=(); |
%parmhash=(); | %parmhash=(); |
$errtext=''; | $errtext=''; |