[LON-CAPA-cvs] cvs: modules /jerf/tests ApacheRequest.pm

bowersj2 lon-capa-cvs@mail.lon-capa.org
Tue, 08 Jul 2003 16:50:06 -0000


bowersj2		Tue Jul  8 12:50:06 2003 EDT

  Modified files:              
    /modules/jerf/tests	ApacheRequest.pm 
  Log:
  Wasn't cloning environments like I thought I was; caused subtle errors.
  
  
Index: modules/jerf/tests/ApacheRequest.pm
diff -u modules/jerf/tests/ApacheRequest.pm:1.9 modules/jerf/tests/ApacheRequest.pm:1.10
--- modules/jerf/tests/ApacheRequest.pm:1.9	Wed Jul  2 16:29:04 2003
+++ modules/jerf/tests/ApacheRequest.pm	Tue Jul  8 12:50:06 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Apache Request Simulator
 #
-# $Id: ApacheRequest.pm,v 1.9 2003/07/02 20:29:04 bowersj2 Exp $
+# $Id: ApacheRequest.pm,v 1.10 2003/07/08 16:50:06 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -615,8 +615,7 @@
 
 sub unloadEnv {
     my $self = shift;
-    my %envcopy = %ENV;
-    $self->{env} = \%envcopy;
+    %{$self->{env}} = %ENV;
     %ENV = %{$self->{oldenv}};
 }