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

raeburn raeburn@source.lon-capa.org
Tue, 02 Dec 2008 01:49:48 -0000


raeburn		Tue Dec  2 01:49:48 2008 EDT

  Modified files:              
    /loncom/xml	lonplot.pm 
  Log:
  - Correction to dereferencing (perl 5.10 is less forgiving). 
  
  
Index: loncom/xml/lonplot.pm
diff -u loncom/xml/lonplot.pm:1.149 loncom/xml/lonplot.pm:1.150
--- loncom/xml/lonplot.pm:1.149	Mon Nov 24 17:17:52 2008
+++ loncom/xml/lonplot.pm	Tue Dec  2 01:49:48 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Dynamic plot
 #
-# $Id: lonplot.pm,v 1.149 2008/11/24 17:17:52 jms Exp $
+# $Id: lonplot.pm,v 1.150 2008/12/02 01:49:48 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1440,7 +1440,7 @@
 	}
 	# complain if the number of data points is not the same as
 	# in previous sets of data.
-	if (($curves[-1]->{'data'}) && ($#data != $#{@{$curves[-1]->{'data'}->[0]}})){
+	if (($curves[-1]->{'data'}) && ($#data != $#{$curves[-1]->{'data'}->[0]})){
 	    &Apache::lonxml::warning
 		('Number of data points is not consistent with previous '.
 		 'number of data points');