Index: openacs-4/packages/survey/www/one-respondent.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/one-respondent.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/survey/www/one-respondent.tcl	1 Mar 2005 00:01:44 -0000	1.6
+++ openacs-4/packages/survey/www/one-respondent.tcl	5 Mar 2008 21:20:39 -0000	1.7
@@ -45,9 +45,10 @@
     set description [ad_text_to_html $description]
 }
 
-db_multirow -extend {answer_summary pretty_submission_date} responses responses_select {} {
+db_multirow -extend {answer_summary pretty_submission_date respond_url} responses responses_select {} {
     set answer_summary [survey_answer_summary_display $response_id 1] 
     set pretty_submission_date [lc_time_fmt $pretty_submission_date_ansi %x]
+    set respond_url [export_vars -base respond {survey_id response_id}]
 }
 
 ad_return_template