Index: openacs-4/packages/assessment/www/asm-admin/questions.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/questions.adp,v
diff -u -r1.4.2.1 -r1.4.2.2
--- openacs-4/packages/assessment/www/asm-admin/questions.adp	27 May 2008 17:21:30 -0000	1.4.2.1
+++ openacs-4/packages/assessment/www/asm-admin/questions.adp	27 May 2008 17:22:44 -0000	1.4.2.2
@@ -4,6 +4,8 @@
 
 <include src="/packages/assessment/lib/section-links" assessment_id="@assessment_id@" tab="@tab@">
 
+<if @sections:rowcount@ eq 0><br/><a class="button" href="section-form?assessment_id=@assessment_id@">#assessment.add_new_section#</a></if>
+
 <multiple name="sections">
 <h3><a name="@sections.sort_order@">#assessment.Section_Number#: @sections.title@</a></h3>
   <a class="button" href="@section_form_edit_url@">#assessment.Edit#</a> 
Index: openacs-4/packages/assessment/www/asm-admin/section-form.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-form.tcl,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/assessment/www/asm-admin/section-form.tcl	7 Oct 2007 22:36:54 -0000	1.8
+++ openacs-4/packages/assessment/www/asm-admin/section-form.tcl	27 May 2008 17:22:44 -0000	1.8.2.1
@@ -6,7 +6,7 @@
 } {
     assessment_id:integer
     section_id:integer,optional
-    after:integer,optional
+    {after:integer,optional 1}
     {__new_p 0}
 } -properties {
     context:onevalue