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

[raeburn]

raeburn		Sat Mar 21 06:12:05 2009 EDT

  Modified files:              (Branch: version_2_8_X)
    /rat	lonuserstate.pm 
  Log:
  - Backport 1.131.
  
  
Index: rat/lonuserstate.pm
diff -u rat/lonuserstate.pm:1.128.2.1 rat/lonuserstate.pm:1.128.2.2
--- rat/lonuserstate.pm:1.128.2.1	Sun Dec 21 04:46:53 2008
+++ rat/lonuserstate.pm	Sat Mar 21 06:12:05 2009
@@ -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.128.2.1 2008/12/21 04:46:53 raeburn Exp $
+# $Id: lonuserstate.pm,v 1.128.2.2 2009/03/21 06:12:05 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -573,7 +573,8 @@
     $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);
 }