--- loncom/interface/loncreateuser.pm 2008/03/08 03:48:41 1.237 +++ loncom/interface/loncreateuser.pm 2008/03/12 02:45:06 1.238 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.237 2008/03/08 03:48:41 raeburn Exp $ +# $Id: loncreateuser.pm,v 1.238 2008/03/12 02:45:06 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1986,7 +1986,7 @@ END foreach my $key (keys(%changeHash)) { $newenvhash{'environment.'.$key} = $changeHash{$key}; } - &Apache::lonnet::appenv(%newenvhash); + &Apache::lonnet::appenv(\%newenvhash); } } else { # error occurred $r->print(''.&mt('Unable to successfully change environment for').' '. @@ -3998,7 +3998,7 @@ sub update_selfenroll_config { foreach my $key (keys(%changes)) { $newenvhash{'course.'.$env{'request.course.id'}.'.'.$key} = $changes{$key}; } - &Apache::lonnet::appenv(%newenvhash); + &Apache::lonnet::appenv(\%newenvhash); } else { $r->print(&mt('An error occurred when saving changes to self-enrollment settings in this course.').'
'.&mt('The error was: [_1].',$putresult)); }