--- loncom/interface/lonnavmaps.pm	2003/03/28 18:14:59	1.168
+++ loncom/interface/lonnavmaps.pm	2003/04/04 18:13:44	1.171
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.168 2003/03/28 18:14:59 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.171 2003/04/04 18:13:44 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -199,6 +199,7 @@ sub real_handler {
     # renderer call
     my $render = render({ 'cols' => [0,1,2,3],
                           'url' => '/adm/navmaps',
+                          'navmap' => $navmap,
                           'suppressNavmap' => 1,
                           'r' => $r});
 
@@ -847,7 +848,7 @@ sub render {
     if (!$ENV{'form.folderManip'} && !defined($args->{'iterator'})) {
         # Step 1: Check to see if we have a navmap
         if (!defined($navmap)) {
-            $navmap = Apache::lonnavmaps::navmap->new($r, 
+            $navmap = Apache::lonnavmaps::navmap->new(
                         $ENV{"request.course.fn"}.".db",
                         $ENV{"request.course.fn"}."_parms.db", 1, 1);
             $mustCloseNavMap = 1;
@@ -1282,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;
     }
 
@@ -1433,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