[LON-CAPA-cvs] cvs: loncom /interface lonnavmaps.pm

bowersj2 lon-capa-cvs@mail.lon-capa.org
Thu, 12 Jun 2003 13:20:27 -0000


bowersj2		Thu Jun 12 09:20:27 2003 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  This didn't speed anything up, so remove it as it will just consume 
  memory.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.198 loncom/interface/lonnavmaps.pm:1.199
--- loncom/interface/lonnavmaps.pm:1.198	Tue Jun 10 16:07:58 2003
+++ loncom/interface/lonnavmaps.pm	Thu Jun 12 09:20:27 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.198 2003/06/10 20:07:58 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.199 2003/06/12 13:20:27 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1595,14 +1595,7 @@
         return undef;
     }
 
-    # try copying into memory
-    my %tmpnavhash;
-    while (my ($k, $v) = each(%navmaphash)) {
-	$tmpnavhash{$k} = $v;
-    }
-    untie %navmaphash;
-
-    $self->{NAV_HASH} = \%tmpnavhash;
+    $self->{NAV_HASH} = \%navmaphash;
     $self->{PARM_HASH} = \%parmhash;
     $self->{INITED} = 0;