Index: openacs-4/packages/survey/tcl/survey-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/tcl/survey-procs.tcl,v
diff -u -r1.5.2.1 -r1.5.2.2
--- openacs-4/packages/survey/tcl/survey-procs.tcl	1 Sep 2004 19:09:29 -0000	1.5.2.1
+++ openacs-4/packages/survey/tcl/survey-procs.tcl	30 Sep 2004 19:15:55 -0000	1.5.2.2
@@ -265,9 +265,9 @@
 	    append return_string "[ad_enhanced_text_to_html "$clob_answer $number_answer $varchar_answer $date_answer"]"
 	} else {
 	    append return_string "$sort_order: "
-	    append return_string [ad_html_to_text $question_text]
+	    append return_string [ad_html_to_text -- $question_text]
 	    append return_string "\n\n"
-	    append return_string "[ad_html_to_text [ad_enhanced_text_to_html "$clob_answer $number_answer $varchar_answer $date_answer"]]"
+	    append return_string "[ad_html_to_text -- [ad_enhanced_text_to_html "$clob_answer $number_answer $varchar_answer $date_answer"]]"
 	}
 	
 	if {![empty_string_p $attachment_answer]} {