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

[albertel]

albertel		Tue Oct  9 18:26:55 2007 EDT

  Modified files:              (Branch: version_2_5_X)
    /loncom/xml	lonplot.pm 
  Log:
  - backport 1.131
  
  
Index: loncom/xml/lonplot.pm
diff -u loncom/xml/lonplot.pm:1.118.2.2 loncom/xml/lonplot.pm:1.118.2.3
--- loncom/xml/lonplot.pm:1.118.2.2	Tue Sep 18 19:30:25 2007
+++ loncom/xml/lonplot.pm	Tue Oct  9 18:26:54 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Dynamic plot
 #
-# $Id: lonplot.pm,v 1.118.2.2 2007/09/18 23:30:25 albertel Exp $
+# $Id: lonplot.pm,v 1.118.2.3 2007/10/09 22:26:54 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1246,7 +1246,6 @@
 		$curve->{'function'}.' title "'.
 		$curve->{'name'}.'" with '.
                 $curve->{'linestyle'};
-            $gnuplot_input.= ' linewidth '.$curve->{'linewidth'};
 
             if (($curve->{'linestyle'} eq 'points')      ||
                 ($curve->{'linestyle'} eq 'linespoints') ||
@@ -1259,6 +1258,8 @@
             } elsif ($curve->{'linestyle'} eq 'filledcurves') { 
                 $gnuplot_input.= ' '.$curve->{'limit'};
             }
+            $gnuplot_input.= ' linewidth '.$curve->{'linewidth'};
+
 	} elsif (exists($curve->{'data'})) {
 	    # Store data values in $datatext
 	    my $datatext = '';
@@ -1282,7 +1283,6 @@
 	    $gnuplot_input.= '"'.$datafilename.'" title "'.
 		$curve->{'name'}.'" with '.
 		$curve->{'linestyle'};
-            $gnuplot_input.= ' linewidth '.$curve->{'linewidth'};
             if (($curve->{'linestyle'} eq 'points')      ||
                 ($curve->{'linestyle'} eq 'linespoints') ||
                 ($curve->{'linestyle'} eq 'errorbars')   ||
@@ -1294,6 +1294,7 @@
             } elsif ($curve->{'linestyle'} eq 'filledcurves') { 
                 $gnuplot_input.= ' '.$curve->{'limit'};
             }
+            $gnuplot_input.= ' linewidth '.$curve->{'linewidth'};
 	}
     }
     # Write the output to a file.