--- rat/lonuserstate.pm 2008/12/19 03:58:24 1.130 +++ rat/lonuserstate.pm 2009/02/18 07:06:19 1.131 @@ -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.130 2008/12/19 03:58:24 raeburn Exp $ +# $Id: lonuserstate.pm,v 1.131 2009/02/18 07:06:19 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -573,7 +573,8 @@ sub accinit { $acchash{'acc.res.'.$short.'.'}='&:0&'; my $courseuri=$uri; $courseuri=~s/^\/res\///; - &Apache::lonnet::delenv('(acc\.|httpref\.)'); + my $regexp = 1; + &Apache::lonnet::delenv('(acc\.|httpref\.)',$regexp); &Apache::lonnet::appenv(\%acchash); }