--- plotpriv.tcl.orig	Fri Jan  9 00:53:45 2009
+++ plotpriv.tcl	Mon Jan 19 13:05:55 2009
@@ -2074,7 +2074,8 @@
 
         set data_series($w,$series,rchartlimits) [list \
             [$w create line $pxmin $pymin $pxmax $pymin -fill $colour -tag [list data data_$series]] \
-            [$w create line $pxmin $pymax $pxmax $pymax -fill $colour -tag [list data data_$series]]
+            [$w create line $pxmin $pymax $pxmax $pymax -fill $colour -tag [list data data_$series]] \
+	]
     }
 }
 
