--- loncom/interface/loncreateuser.pm 2010/01/03 03:14:45 1.295.2.16 +++ loncom/interface/loncreateuser.pm 2009/09/23 03:47:53 1.295.8.1 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.295.2.16 2010/01/03 03:14:45 raeburn Exp $ +# $Id: loncreateuser.pm,v 1.295.8.1 2009/09/23 03:47:53 gci Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1428,9 +1428,9 @@ sub display_existing_roles { } $row.= ''.$plaintext. ''.$area. - ''.($role_start_time?&Apache::lonlocal::locallocaltime($role_start_time) + ''.($role_start_time?localtime($role_start_time) : ' ' ). - ''.($role_end_time ?&Apache::lonlocal::locallocaltime($role_end_time) + ''.($role_end_time ?localtime($role_end_time) : ' ' ) .""; $sortrole{$sortkey}=$envkey; @@ -2498,7 +2498,8 @@ sub update_user_data { $newenvhash{'environment.requestcourses.'.$key} = $changeHash{'requestcourses.'.$key}; if ($changeHash{'requestcourses.'.$key} ne '') { - $newenvhash{'environment.canrequest.'.$key} = 1; + $newenvhash{'environment.canrequest.'.$key} = + $changeHash{'requestcourses.'.$key}; } else { $newenvhash{'environment.canrequest.'.$key} = &Apache::lonnet::usertools_access($env{'user.name'},$env{'user.domain'},