[LON-CAPA-cvs] cvs: loncom /xml lonplot.pm

[raeburn]

raeburn		Thu Jan 31 17:10:38 2013 EDT

  Modified files:              
    /loncom/xml	lonplot.pm 
  Log:
  - Bug 6641. Modify change in rev 1.170. 
    - Set scope correctly for $plot_type inside "curves" loop. 
  
  
Index: loncom/xml/lonplot.pm
diff -u loncom/xml/lonplot.pm:1.171 loncom/xml/lonplot.pm:1.172
--- loncom/xml/lonplot.pm:1.171	Mon Jan 21 02:25:38 2013
+++ loncom/xml/lonplot.pm	Thu Jan 31 17:10:38 2013
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Dynamic plot
 #
-# $Id: lonplot.pm,v 1.171 2013/01/21 02:25:38 raeburn Exp $
+# $Id: lonplot.pm,v 1.172 2013/01/31 17:10:38 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1984,7 +1984,7 @@
     #
     my $linestyle_index = 50;
     my $line_width   = '';
-    my $plots;
+    my $plots = '';
 
     # If arrows are needed there will be an arrow style for each as well:
     #
@@ -1993,8 +1993,11 @@
 
     for (my $i = 0;$i<=$#curves;$i++) {
 	$curve = $curves[$i];
-	my $plot_command;
-	my $plot_type = ', ' if ($i > 0);
+	my $plot_command = '';
+	my $plot_type = '';
+	if ($i > 0) {
+	    $plot_type = ', ';
+	}
 	if ($target eq 'tex') {
 	    $curve->{'linewidth'} *= 2;
 	}