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

[bowersj2]

bowersj2		Tue Oct 15 16:05:36 2002 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  Multi-part problems with just one part are treated as single-part problems.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.82 loncom/interface/lonnavmaps.pm:1.83
--- loncom/interface/lonnavmaps.pm:1.82	Tue Oct 15 15:51:25 2002
+++ loncom/interface/lonnavmaps.pm	Tue Oct 15 16:05:35 2002
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.82 2002/10/15 19:51:25 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.83 2002/10/15 20:05:35 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1080,6 +1080,13 @@
                   # with only one part without loss
             }
 
+            # Is it a multipart problem with a single part, now in 
+            # @parts with "0" filtered out? If so, forget it's a multi-part
+            # problem and treat it like a single-part problem.
+            if ( scalar(@parts) == 1 ) {
+                $multipart = 0;
+            }
+
             # Display one part, in event of network error.
             # If this is a single part, we can at least show the correct
             # status, but if it's multipart, we're lost.
@@ -1202,7 +1209,7 @@
                     $partLabel = " (Part $part)"; 
                     $title = "";
                 }
-                if ($multipart && $condensed && $curRes->countParts > 1) {
+                if ($multipart && $condensed) {
                     $nonLinkedText .= ' (' . $curRes->countParts() . ' parts)';
                 }