[LON-CAPA-cvs] cvs: rat / lonuserstate.pm

[albertel]

albertel		Tue Jul 30 16:01:40 2002 EDT

  Modified files:              
    /rat	lonuserstate.pm 
  Log:
  - BUG#574
  
  
Index: rat/lonuserstate.pm
diff -u rat/lonuserstate.pm:1.35 rat/lonuserstate.pm:1.36
--- rat/lonuserstate.pm:1.35	Thu Jul 25 12:55:53 2002
+++ rat/lonuserstate.pm	Tue Jul 30 16:01:40 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construct and maintain state and binary representation of course for user
 #
-# $Id: lonuserstate.pm,v 1.35 2002/07/25 16:55:53 www Exp $
+# $Id: lonuserstate.pm,v 1.36 2002/07/30 20:01:40 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -473,8 +473,8 @@
    unlink($fn.'parms.db');
    undef %randompick;
    $retfurl='';
-   if ((tie(%hash,'GDBM_File',"$fn.db",&GDBM_WRCREAT,0640)) &&
-       (tie(%parmhash,'GDBM_File',$fn.'_parms.db',&GDBM_WRCREAT,0640))) {
+   if ((tie(%hash,'GDBM_File',"$fn.db",&GDBM_WRCREAT(),0640)) &&
+       (tie(%parmhash,'GDBM_File',$fn.'_parms.db',&GDBM_WRCREAT(),0640))) {
     %hash=();
     %parmhash=();
     $errtext='';