Index: openacs-4/packages/survey/www/admin/responses-export.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/responses-export.tcl,v
diff -u -r1.1.2.3 -r1.1.2.4
--- openacs-4/packages/survey/www/admin/responses-export.tcl	9 Dec 2002 23:00:03 -0000	1.1.2.3
+++ openacs-4/packages/survey/www/admin/responses-export.tcl	14 Mar 2003 17:56:36 -0000	1.1.2.4
@@ -124,9 +124,9 @@
 	
 	incr r
 	if {$r>99} {
-	    ns_write "${csv_export} "
+	    ns_write "${csv_export}"
 	    set csv_export ""
-	    set rows 0
+	    set r 0
 	}
 
     }