--- loncom/interface/lonnavmaps.pm	2003/06/10 15:45:16	1.195
+++ loncom/interface/lonnavmaps.pm	2003/06/12 13:20:27	1.199
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.195 2003/06/10 15:45:16 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.199 2003/06/12 13:20:27 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -966,6 +966,10 @@ sub render_communication_status {
         }
     }
 
+    if ($params->{'multipart'} && $part != '0') {
+	$discussionHTML = $feedbackHTML = $errorHTML = '';
+    }
+
     return "<td width=\"75\" align=\"left\" valign=\"center\">$discussionHTML$feedbackHTML$errorHTML&nbsp;</td>";
 
 }
@@ -1021,8 +1025,6 @@ sub render_long_status {
         $result .= '(randomly select ' . $resource->randompick() .')';
     }
     
-    $result .= " - $part &nbsp;</td>\n";
-    
     return $result;
 }
 
@@ -1413,8 +1415,13 @@ sub render {
                         @parts = ($parts[0]);
                         $args->{'condensed'} = 1;
                     }
-                    
                 }
+		# Multipart problem with one part: always "condense" (happens
+		#  to match the desirable behavior)
+		if ($curRes->countParts() == 1) {
+		    @parts = ($parts[0]);
+		    $args->{'condensed'} = 1;
+		}
             }
         } 
             
@@ -1588,14 +1595,7 @@ sub new {
         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;