Index: openacs-4/packages/simple-survey/www/view-attachment.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/view-attachment.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/simple-survey/www/view-attachment.tcl 20 Apr 2001 20:51:22 -0000 1.1 +++ openacs-4/packages/simple-survey/www/view-attachment.tcl 31 Oct 2001 20:42:07 -0000 1.2 @@ -32,6 +32,8 @@ # moment we're still using tcl variable substitution because we # are certain that these are integers +# DRB: should be rewritten to use the content repository ... + db_write_blob return_attachment {select attachment_answer from survsimp_question_responses where response_id = $response_id and question_id = $question_id