[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;