[LON-CAPA-cvs] cvs: loncom /enrollment Enrollment.pm

albertel lon-capa-cvs@mail.lon-capa.org
Fri, 05 Dec 2003 19:07:19 -0000


albertel		Fri Dec  5 14:07:19 2003 EDT

  Modified files:              
    /loncom/enrollment	Enrollment.pm 
  Log:
  - allw this to work in standalone mode
  
  
Index: loncom/enrollment/Enrollment.pm
diff -u loncom/enrollment/Enrollment.pm:1.3 loncom/enrollment/Enrollment.pm:1.4
--- loncom/enrollment/Enrollment.pm:1.3	Fri Dec  5 13:56:27 2003
+++ loncom/enrollment/Enrollment.pm	Fri Dec  5 14:07:19 2003
@@ -169,7 +169,10 @@
                     if ($newstart eq '') {
                         $newstart = $startdate;
                     }
+		    #explicitly allow acces to creating students
+		    $ENV{'allowed.cst'}='F';
                     &Apache::lonnet::assignrole($dom,$uname,$uurl,"st",$newend,$newstart); 
+		    delete($ENV{'allowed.cst'});
                 }
             }
         }