Index: openacs-4/packages/assessment/tcl/as-assessment-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-assessment-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/tcl/as-assessment-procs.tcl	15 Nov 2004 17:17:15 -0000	1.3
+++ openacs-4/packages/assessment/tcl/as-assessment-procs.tcl	22 Nov 2004 11:40:42 -0000	1.4
@@ -28,6 +28,7 @@
     {-time_for_response ""}
     {-show_feedback ""}
     {-section_navigation ""}
+    {-survey_p ""}
 } {
     @author Eduardo Perez (eperez@it.uc3m.es)
     @creation-date 2004-07-26
@@ -64,7 +65,8 @@
 						   [list wait_between_tries $wait_between_tries] \
 						   [list time_for_response $time_for_response] \
 						   [list show_feedback $show_feedback] \
-						   [list section_navigation $section_navigation] ] ]
+						   [list section_navigation $section_navigation] \
+						   [list survey_p $survey_p]] ]
     }
 
     return $as_assessment_id