--- loncom/interface/lonnavmaps.pm 2003/03/28 18:29:49 1.169 +++ loncom/interface/lonnavmaps.pm 2003/04/01 19:28:05 1.170 @@ -2,7 +2,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.169 2003/03/28 18:29:49 bowersj2 Exp $ +# $Id: lonnavmaps.pm,v 1.170 2003/04/01 19:28:05 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1283,7 +1283,7 @@ sub new { if (!(tie(%parmhash, 'GDBM_File', $self->{PARM_HASH_FILE}, &GDBM_READER(), 0640))) { - untie $self->{PARM_HASH}; + untie %{$self->{PARM_HASH}}; return undef; } @@ -1434,8 +1434,8 @@ sub getIterator { # unties the hash when done sub untieHashes { my $self = shift; - untie $self->{NAV_HASH}; - untie $self->{PARM_HASH}; + untie %{$self->{NAV_HASH}}; + untie %{$self->{PARM_HASH}}; } # Private method: Does the given resource (as a symb string) have