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

[bowersj2]

bowersj2		Fri Jan 10 12:46:46 2003 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  Removed irrelevant optimization. It doesn't have any affect on speed, either way, so it's basically just dead code.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.122 loncom/interface/lonnavmaps.pm:1.123
--- loncom/interface/lonnavmaps.pm:1.122	Thu Dec 12 13:24:05 2002
+++ loncom/interface/lonnavmaps.pm	Fri Jan 10 12:46:46 2003
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.122 2002/12/12 18:24:05 www Exp $
+# $Id: lonnavmaps.pm,v 1.123 2003/01/10 17:46:46 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -985,12 +985,8 @@
         return undef;
     }
 
-    # Now copy the hashes for speed (?)
-    my %realnav; my %realparm;
-    foreach (%navmaphash) { $realnav{$_} = $navmaphash{$_}; }
-    foreach (%parmhash) { $realparm{$_} = $navmaphash{$_}; }
-    $self->{NAV_HASH} = \%realnav;
-    $self->{PARM_HASH} = \%realparm;
+    $self->{NAV_HASH} = \%navmaphash;
+    $self->{PARM_HASH} = \%parmhash;
 
     bless($self);
     $self->untieHashes();